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56 
es 1.0 ABSTRACT 
g THE RK611 DISKLESS CONTROLLER DIAGNOSTIC: PART 3 
60 A. TESTS MULTI-SECTOR DATA TRANSFERS. 
61 B. T T MID-TRANSFE apreKs 
6 , TS CYLINDER 5 CHECKING. 
6 DB: } NPR T 0 MEMORY. . 
bs E. teats ECC ia DETECTION AND CORRECTION, BOTH 
66 F. STS HR HECK OTH 16 AND 18 BIT MODES AND FORCES 
B ; WRIT Check E 
69 NO RKOG DRIVE IS REQUIRED FOR PROGRAM EXECUTION. 
71 
a: 2.0 REQUIREMENTS 
oa 2.1 EQUIPMENT 
76 PDP-11 SYSTEM (16K CORE MEMORY) 
77 CONSOLE TERMINA’ 
78 DECTAPE, PAPER TAPE READER, OR DECDISK 
oe RK611 CONTROLLER 
81 
Be 2.2 PRELIMINARY PROGRAMS . 
i 
B RKO11 DISKLESS CONTROLLER DIAGNOSTIC: PART 1 (CZREA) 
86 RKelt + Brett aa SONTROLCER BT AGN arte: PART § {ESReR} 
8 RK611 DISKLESS CONTROLLER DIAGNOSTIC: PART 4 (CZR6D) 
83 3.0 OPERATING PROCEDURES 
3 3.1 LOADING PROCEDURE 
cS) THE PROGRAM CAN BE LOADED FROM PAPER TAPE USING ABSOLUTE LOADER 
34 OR FROM XXDP MEDIA SUPPORTED BY XXOP. 
96 
37 3.2 STARTING PROCEDURE 
132 LOCATION 200 - START PROGRAM 
101 LOCATION 204 - RESTART PROGRAM 
103 LOCATION 214 UEST BUS ADDRESS, VECTOR ADDRESS, AND 
104 ~ BE OUE Pty HOD! OUR ET TON 
10s 3.3 OPTIONAL SWITCH SETTINGS 
197 W1iS - HALT PR PROGRAM 
108 W114 - TEST 
109 SW13 - TNNIBIT ERROR TYPE OUT 
110 SWi2 - ABORT AFTER 20 ERRORS 
111 SWil - INHIBIT ITERATION COUNT 
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EACH TIME SWITCH SETTINGS pre ENTERED, THE ENTIRE SWITCH 
ey PEM Tes MUST BE ENTERED. LEADING ZEROES ARE NOT REQUIRED. 
*RUBOUT’ "CONTROL _U’ FUNCTIONS MAY BE USED TO CORRECT TYPING 


ERRORS DURING SWITCH ENTRY. 


ON PROCESSORS WITH HARDWAR ag thes REGISTERS, THE *SOFTWARE’ SWITCH 
REGISTER MAY BE USED. IF THE PROGRAM FINDS ALL 16 SWITCHES 

IN THE ’UP’ POSITION, ALL SWITCH REGISTER REFERENCES WILL BE TO THE 
chia REGISTER AND THE PROCEDURES DESCRIBED ABOVE MUST BE 


4.2 CONTROL C (tC) OPERATION 


IF tC IS TYPED AT ANY TIME DURING THE PROGRAM EXECUTION THE 
PROGRAM IS HALTED IMMEDIATELY. IF A MONITOR IS PRESENT (XXDP CHAIN 
ACT. APT) THE PROGRAM RETURNS CONTROL TO THE MONITOR. IF NO MONITOR 
IS PRESENT, THE CPU IS HALTED. DEPRESSING THE CONTINUE KEY WILL DO 
A PROGRAM RESTART. 


4.3 CONTROL S (tS) OPERATION 


13 RROR 
18 SW8 - LOOP ON TEST IN SWITCHES 0-7 

16 

1? 3.5 RUN TIME 

19 FIRST PASS 1:40 MINUTES 

go SUBSEQUENT PASSES 3:40 MINUTES 

a 

¢3 4.0 OPERATING PROCEDURES 

Ba THE PROGRAM IS EXECUTED BY STARTING AT THE APPROPIATE ADDRESS. 

27 

Be 4.1 SOFTWARE’ SWITCH REGISTER 

30 IF THE PROGRAM S BEING RUN ON A SHITCHLESS PROCESSOR (TE. AN 11704 
31 OR 11734) THE WILL DETERM THAT THE HARDWARE SWITCH 

32 REGISTER IS NOT PRESENT AND WILL USE A 'SOFTWARE’ SWITCH 

3 REGISTER. T TT OF THE SOFTWARE’ SWIT HES ARE CONTROLLED 

3 THROUGH A_KEY Ang TNE WHICH IS CALLED BY TYPING "CONTROL G’. THE 
3 PROGRAM WILL RECOGNI HE 'CONTROL G’ AT ANY TIME EXCEPT WHEN THE 

3 PROGRAM IS AT A HIGHER PRIORITY PROCESSING AN RKOG INTERRUPT. THE 

3 ’SOFTWARE’ SWITCH VALUES ARE ENTERED AS AN OCTAL NUMBER IN RESPONSE 

3 TO THE PROMPT FROM THE SWITCH ENTRY ROUTINE: 

4 

y 

4 

y 

y 

y 
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IF tS IS TYPED AT ANY TIME_THE PROGRAM WILL GO INTO A STALL LOOP 
UNTIL A CONTROL @ (tQ@) IS TYPED. 
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SEQ 000s 


HAS ore we TYPING THE t@ CANCELS THE STALL 


#*MULTI-SECTOR WRITE OPERATIONS 


TEST 1 


TEST 2 


TEST 3 


TEST 4 


MULTI-SECTOR WRITE (PART 1) 


CLEAR THE RK611 CONTROL ee WI 


TH A CONTROL EN CLEAR. 
PUT 3 CONT Rake aoe i 


SUE Male 


E 
A SECTOR PULSE 
AND THE 


R_ RECOGNITION 
ARCHED FOR. 
K RECOGNITION 


MULTI-SECTOR WRITE (PART 2) 


CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
PUT THE CONTROLLER_IN DIAGNOSTIC MODE. psoas a WRITE 


DATA OF 4O1 TO AN RKOG IN SECTOR FORMA 
CYL INDE PAD BP oak THROUGH CEeK 


MESSAGES. SIMULA TE A CTOR PULSE 


OUGH 4 Ss THE 
: E SURE THE NEXT HEADER RECOGNITION 

TARTS AND THE PROPER HEADER IS SEARCHED FOR. 

8 SECOND GOOD HEADER AND CHECK RECOGNITION 


MID-TRANSFER SEEK (PART 1) 


gt a He ONTRO Len Wity AC 
EonTR 1m R. az io3 AGNOSTIC 


D A GOOD HEADER WOR 
TWO WORD ECC. MAKE SURE THE CONTROLLER I 
AN IMPLIED SEEK TO THE RIGHT HEAD AND CYLIN 
MAKE SURE THE NEXT HEADER RECOGNITION PROCE 


MID-TRANSFER SEEK (PART 2) 


PUT THE CONTROLLER IN DIAGNO 
DATA OF 401 i WORDS TO AN RKO& IN 26 SECTOR POMAT 
CYLINDER 0, HEAD 2, SECTOR 25. CLOCK T HROUGH SEEK 
SECTOR PULSE 
ORDS AND THE 


BND DRIVE CLEAR M SIMULATE A 
AND A GOOD HE CLOCK THROUGH 400 WORD 
TWO WORD ECC. BRKE SURE THE CONTROLLER ISSUES 
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SEQ 0006 


AN IMPLIED SEEK TO THE RIGHT HEAD nO éY Lin DER. 
MAKE SURE THE NEXT HEADER RECOGNI 1110 ROCEEDS PROPERLY. 


MID-TRANSFER SEEK AND 24 SECTOR FORMAT 
ane RK611 CONTROLLER WITH A CONTROLLER CLEAR 


T CONTROLLER IN DIAGNOSTIC MODE. ISSUE 8 A WRITE DATA 
DATA OF 401 WORDS TO AN RKO& IN 24 SECTOR FORMAT 
CYLINDER EAD ee SECTOR 23. CLOCK THROUGH SEEK 
AND DRIVE CLEAR A ME SAGES, TBAMULATE (A SE SECTOR PULSE 
AND eae BP Oe Re CHECK a MPLTED SE 


or TO SREXt TRACK. CHECK FOR PROPER HEADER RECOGNITIO 


CYLINDER OVERFLOW (PART 1) 


PUP THE CONTROLLER IN OTAGNOSTIC MODE.” ISSUE A Unie 


ab Wi Maat eb 7 Rac See BE 


oot DER 
TWO WORD ECC. MAKE SURE CYLINDER OVERFLOW TERROR” BOES 
NOT Ser 


CYLINDER OVERFLOW (PART 2) 


UT THE CONTROLLER IN DIAGNOSTIC MODE. ISSUE A WRITE 
DATA ROS AN RKO& IN 26 SECTOR FORMA 
CYLINDER 6 HEAD 2, SECTOR 25. CLOCK THROUGH SEEK 


T 
AND DRIVE CLEAR MESSAGES. SIMULATE A SECTOR PULSE 
AND A GOOD HEADER. CLOCK THROUGH 400 WORDS 


D Al 
TWO ECC WORDS. MAKE SURE CYLINDER OVERFLOW ERROR SETS. 


*#*NPR WRITING OF MEMORY 
TEST 10 NPR WRITING OF MEMORY 


UPAGORTROLLERNIN BYFanOet ic’ MODE, TSEUE A READ OATA 


bie 0 ERO Re eT R “ELOGK, TH ROUGH SEEK 
AND DRIVE CLE SSAGES. SIMULATE A TORO GR PULSE 

A GOOD HEADER, 40 DATA WORDS.. VERIFY THAT THE WORDS 
ARE WRITTEN PROPERLY IN MEMORY 


**#ECC ERROR DETECTION/CORRECTION TESTS 
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TEST 11 READ DATA WITH NO ERROR 


SEQ 0007 


SLE ARAY ER*TRSLRRA ETC nGBETROLEERE EF RBAO ona 
SRONBRE VE’ “CLEAR ResBhces Os GtATE ae Potse, 


A_ GOOD HEA a AND A 
VERIFY THAT C 8) COnPL TES’ WITHOUT 


oR 


TEST 12 READ DATA WITH ONE BIT BURST ERROR (PART 1) 


ut CONTROLLER’ I ND TAGNOSTIC “WODE, TSSUE A READ DATA 


sleet” cube rR 8, eagek,T 


Typo PULSE 


TB GAB AAP SABES dNQIEST IA 


eer ene Dfa ERR LES" ostraan INFORMATION. 
SURE DATA CHECK AND CONTROLLER ERROR SET 


TEST 13 READ DATA WITH ONE BIT BURST ERROR (PART 2) 


CLEAR RK611 CONTROLLER MiTY A_CONTROLL 


ER CLEAR. 


oF 4 460 WORDS T° IN AN PIG Ty ge sector FORnAT, READ DATA 


SS a: Pipes ed 
icSif Phe eOoirtNe ore oll floe™ 


REGISTER FINAL PATTERN TaN POS 
MAKE SURE ADATA MEHECK AND CONTROLLER ER 


TEST 14 READ DATA WITH 11 BIT BURST ERROR 


BUI CONTROLLER IN DYRGNGET IC nObE. TSE 


400 WORDS TO AN RKO 


BN’ DRIVE CLEAR MESSAGES” SinuLAvE a! 


pasar 


PC Sir emt on. 


Bie Reo DATA 


ve PULSE. 


ANS re Catt BURST. e ROR. A VERIFY FHE COUNT NG TOF ite Sey 


REGISTER AND THE FINAL PATTERN AND POS 


11IO Sey rent SoM, 


MAKE SURE DATA CHECK AND CONTROLLER ERROR SET 


TEST 15 READ DATA WITH 1l2 BIT BURST ERROR 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
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TEST 16 


TEST 17 


TEST 20 


TEST 21 


TEST 22 


8 SEQ 0008 


PUT CONTROLLER IN DIAGNOSTIC ISSUE A READ DATA 
OF 400 WORDS TO AN RKO6_IN 26 FORMAT 
CY i] THROUGH SEEK 
MULATE A SECTOR PULSE, A 

HEADER, 400 DATA WORDS AND AN ECC_INDICATING 
A le BIT BUR . OUNTING OF THE 
POSTTTON REGISTER. MAKE SURE DATA CHECK, ECC HARD, 
AND CONTROLLER ERROR SETS. 


READ DATA WITH 23 BIT BURST ERROR 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR 

PUT CONTROLLER IN N Rese fh IC MODE. ISSUE A READ DATA 

OF 400 WORDS T T RKO IN 26 SECTOR FORMAT 

CYLINDER 0, HEAD 0, SECTOR O. CLOCK 

AND DRIVE CLEAR MESSAGES Si T 
400 DATA WORDS AND AN ECC INDICA 

A 23 BIT T ERROR. VERIFY THE COUNTING OF 

POSITION REGISTER. MAYE SURE DATA CHECK, ECC 

AND CONTROLLER ERROR SETS. 


READ DATA WITH 1 BIT ECC WORD ERROR 


cLERS So" WORDS ao Me WITH A CONTROLLER CLEAR. 
AN RKO6_IN 26 SECTOR MA 

an TLINDER 0 

G50 


18 BIT NPR WRITING OF MEMORY 


CLEAR RK611 CONTROLLER WITH A CONTROLLER Ce, 

PUT aaa Ne IN DIAGNOSTIC MODE. Se READ DATA 
OF 400 WORDS TO AN RKO& IN 24 SECTOR FORM 

CYLINDER 0, HEAD 0, SECTOR O. CLOCK FAROUGE SEEK 


AND DRIV ast AR, MESSAGES SIMULATE A SECTOR PULSE 
A GOOD DATA WORDS. VERIFY THAT THE WORDS 
ARE Oe TTEN REBROPERLY N MEMORY. 


18 BIT READ DATA WITH NO ERROR 
CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
PUT 68 woR0S-T IN DIAGNOSTIC ISSUE A READ DATA 
400 WORDS TO AN RKO& IN 24 SECTOR FORMAT 

INDER O, HE SECT CLOCK THROUGH SEEK 
AND ORIVE CLEAR MESSAGES. SIMULATE A SECTOR PULSE 
A GOOD NEABERS R8 DATA WORDS, AND A GOOD 3e BIT Etc. 
VERIFY THAT COMMAND COMPLETES WITHOUT ERROR. 


18 BIT READ DATA WITH DCK 
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CLEAR RK611 CONTROLLER WI 
PUT CONTROLLER IN DIAGNOS 
OF iN WORDS TO AN RK 

cv ER 0, HEAD O 
AND VE CLEAR MESSAGES. 


00 DATA 
T_ERROR 


A ONE BIT BURST 
HE COUNTING OF THE 


VERIFY 

FINAL PATTERN 

CONTROLLER ERROR SETS. 
TEST 23 18 BIT READ DATA WITH ECH 


CLEAR RK611 CONTROLLER WIT 
- CONTROLLER IN DIAGNOST 
WORDS KO6_IN 


A le Bri 
POSTTi ON ae ERY MAK 
AND CONTROLLER ERROR gers: 


#*SPECIAL READ TESTS 
TEST 24 PARTIAL SECTOR READ 


LEAR RK611 CONTROLLER WITH 

i SONTRO OLLER otty DI STIC 

AN RKO& IN 26 

Or LINBER O SHEAD 0, SECTOR 
AND DRIVE 1 HR 


MESSAGES. 
A GOOD MEABER 400 DATA 


AND POSITION. 


SEQ 0009 


peter) 


ER AND 


TROLLER CLEAR. 
ieee READ DATA 
OEK Tae HROUGH SEEK 

TE A SECTOR PULSE 
THE COUNTING OF THE 
DATE CHECK, ECC HARD, 


i 
PVERIEY The AND AND ECC INDICATING 
URE 


AS CON Ob TSSUE A CLEAR. 
SSUE A READ DATA 
Se SECTOR 


RMAT 
0. CLOCK ay AOU GH SEEK 
SIMULATE A SECTOR PULSE, 


WORDS, AND A GOOD 3e BIT ECC 


MAKE SURE ONLY 103 WORDS GOT TRANSFERRED TO MEMORY. 


TEST 25 SILQ UNLOAD BEFORE HEADER ERROR 


Lore RK611 CONTR 


ust poRbe Tr IN DIAGNOST 
TO AN RKOG 


zx 
m 
w 
5 
m 
RORm CS 
zame . 
m 
=z 
on 


*#*#WRITE CHECK TESTS 
TEST 26 WRITE CHECK OF 400 WORDS 


SE AD 
PREVIOUS SECTOR GETS LOADED 
TOR ERROR AND CONTROLLER ERROR SETS 


LER WITH A CONTROLLER CLEAR. 
Ic MODE. IS 


UE ° READ DATA 


he SECTOR FOR 
- CLOCK THRO! 
IMULATE A SECTOR PULSE 


CZR6EBO RK611 OSKLS CTRL PRIS 
C2ZR6EB.P11 Oe-DEC-77 10:21 


MACY11 30(1046) 


02-DEC-77 





KOl 


10:43 PAGE 10 SEQ 0010 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
PUT CONTROLLER IN DI STIC MODE. A_WRITE 
CHECK OF r ar wees TO_AN RKO6 IN 26 S§CTOR posmar 
CYLINDER 0, SECTOR O. LOK HROUGH 

AND DRIVE Oa ARS MESSAGES. SRA OTE 8 SECTOR PULSE, 
A GOOD HEADER, THE 400 WORDS TO BE WRITE CHECKED, 
AND A GOOD 32’°BIT ECC. MAKE SURE NO ERRORS SET. 


TEST 27 WRITE CHECK WITH DCK 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
PUT CONTROLLER IN DIAGNOSTIC MODE. ISSUE A WRITE 
CHECK OF 400 W WORDS TO AN RKO& IN 26 SECTOR FORMAT, 
CYLINDER O SECTOR 0. CLOCK S 

DRIVE CLEAR MESSAGES. SIMULATE A SECTOR PULSE, 

HEADER, THE 400 WORDS TO oe WRITE CHECKED, 

A 32 BIT ECC INDICATING A 1 BIT BURST ERR 
VERIFY THAT THE POSITION REGISTER INCREMENTS PROPERLY 
AND THAT THE FINAL PATTERN AND POSITION ARE CORRECT 


CHECK THAT DATA CHECK AND CONTROLLER ERROR ARE SET. 


TEST 30 WRITE CHECK OF 18 BIT WORDS 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
PUT CONTROLLER IN oy yt: MODE. ISSUE A WRITE 
CHECK OF 400 WORDS TO AN BKe IN ed THROU FORMAT, 
HEAD SECTOR 0. CLOCK EEK 


CYLINDER O OUGH 
AND DRIVE SeaAR AR MESSAGES. SIMULATE we FEC TOE P PULSE, 
A GOOD HEA THE 400 WORDS KED, 


TO B 
AND A GOOD 32’BIT ECC. MAKE SURES Non ERRORS SET. 


TEST 31 WRITE CHECK OF A PARTIAL SECTOR 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 

PUT CONTROLLER tf DIAGNOSTIC MODE. ISSUE A WRITE 

CHECK OF 1 WORD TO AN RKO6 IN 26 SECTOR FORMAT 

CYLINER 0, HEAD O, SECTOR O. CLOCK THROUGH SEEK. 

AND DRIVE CLEAR_MESSAGES. SIMULATE A SECTOR PUL 

Ae te HEADER ma ONE WORD ie BE WRITE-CH ECKED, ©4277 WO 


MAKE SURE NO ERRORS SET. 


TEST 32 WRITE CHECK ERROR (PART 1) 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
PUT CONTROLLER IN ts IC MODE. ISSUE A WRITE 
CHECK OF 1 WORD TO AN RKO6 IN 26 SECTOR FORMAT 
CLINDER O, HEAD O, SECTOR 0. CLOCK THROUGH SEEK 


/ 
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TEST 33 


TEST 34 


TEST 35 


ll SEQ 0011 


AND DRIVE CLEAR MESSAGES. SIMULATE A nSiSTT PULSE 


afte CHECKED’ onTA YS ooauG1” Rake SURE inte She pea 


REPEA LLOWING CONFIGURAT 
AS BRITE StNECKED™ para: 


oooode oogd4o 001000 de0000 
oo00d04 000100 O0e000 O40000 
000010 d00e 004000 100000 
oo00ed Oo0400 010000 


WRITE CHECK ERROR (PART 2) 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
PUT CONTROLLER af yoy et IC MODE. ISSUE A a 


CHECK OF i WORD 9 OR FORMAT 
CYLINDER HEAD SECTOR LOCK THROUGH SEEK 
AND DRIVE eLEAR aftESSAGES SIMULATE A CECTOR PU 


LSE 
WORD OF DATA CONSISTING OF 177777 
WRITE CO CHECKED’ DATA DATA IS 177776. MAKE 
CHECK ERROR SETS. REPEAT USING EACH OF THE FOLLOWING 


CONFIGURATION AS WRITE CHECKED DATA: 


177767 177577 = 173777 
177757 «177377 167777 


WRITE CHECK ERROR (PART 3) 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
PUT CONTROLLER IN DIAGNOST IC MODE. ISSUE A WRITE 
CHECK OF 1 WORD T AN _RKOG 7 IN 24 SECTOR FORMAT 

CYLINDER RE CLOCK THROUGH SEEK 
aN : DRIVE aSeEAR one SSAGES “SinuLate EA A SECTOR P PULSE, 


SFP Rex HEAR SEES REPAY GETRE son et 


WRITE CHECK ERROR (PART 4) 


CLEAR RK611 CONTROLLER WITH A lan wrt 
PUT CONTROLLER IN OL AGNOST Ic ‘ie aaay Hea" ORHAT, 
CHECK ae 4 We RD AN RKO& IN FORMA 
CYLINDER ECTOR CL Oek: ROUGH SEEK’ 
he! 5 DRIVE LEAR MESSAGES SI ULATE A SECTOR PULSE, 
25 GOOD WORD ‘ 
MAKE SURE W RITE CHECK ERROR str CHECK WORD COUNT 
AND BUS RODRESS 
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£40 
eps RKKKKEEF RERKRKKKKKKRERARAERARAAREAAAARE RE RAAEAARARALAAARARAARAARAEE 
563 DIAGNOSTIC MODE SECTOR PULSE 
eed RELKKREEKKL AER RKRKRE REARS LRA RAKERARLLAAE AER ERALAAAA RE SAARAAAAARAER 
566 THE SECTOR PULSE IS PROVIDED BY THIS ROUTINE 
See KRKKKRRKKRARAKRERERERKRARSKEREAAKKAARERERA RARER LRAARARRRERAAKAERRKREE 
569 DIAGNOSTIC MODE IMPLIED SEEK 
250 MREREKLKEKKESKALEREKKLRRAAKRKRERKAERESAARRAALLARARARAAAHRARRARARARAKRERERE 
o7e THE CONTROLLER 1s CLOCKED THROUGH. THE ESSA Sy 
a Bir FERENT CO OUR FOR bRYTe a: siti aite Cheek 
576 oH ROBT ine c899* BND ye Eero creck MeOUNT S ACCORDINGLY. 
578 AT THE END OF THE IMPLIE K THE CONTENTS OF CS1, MRI 
579 AND HRs NRE SHECKED TO ia Y THE OP NAF OR. ALL btscreP 
380 ARE REPORTED IN THE ORDER LISTED. 
$8. CALL: 
58 ISR R4, DISEEK 
23: Feros 2181 HIRSOUEARE ERROR 
586 ERROR 6 :MRe M SC OMPARE RROR 
587 ERROR 7 :MR3 MISCOMPARE ERRON 
S893 KREKKKREKLEKKRKEEREEKESLEEREREARRAA SERRA RARER RRA RRRAERERKRAARAALEKEE 
530 DIAGNOSTIC MODE READ SYNC PATTERN (PREAMBL 
at KEKE KGL EEE REAR GEESE EERE KE RRA RRA AERL ERE RRR REERRREKRREARRKRARREE 
593 THE 255 “0” BITS A AND 1 "1" BIT ARE CLOCKED THROUTH THE R 
ea: BF EONS be hatter RESO: CST 1S cHECKED 96 INSURE 
ee Blo Nb oP eles 
598 L: 
599 ise R4, DRSYNC 
600 ROR 10’ ;MR1 CONTENTS IN ERROR 
602 ERROR 11 ;CS1 CONTENTS IN ERROR 
4 T H T W SET UP TO A 
e FN RESBO? FE SPETRC EER’ LOGE BHCERHOR Ys aby SET UP TO 
607 
608 KREKKEKERE RRR RAR RARER RRRRKR RRR R KARR RAR RRAARRAKARRRRERERERES 


OOOO rrn 
eed ot a ae] 
WsWur-OwW 


DIAGNOSTIC MODE HEADER READ AND COMPAR 
9 HE HSE HE HE HE HE ME A HE AE HE EH A a a a a a a a HE 


THIS ROUTING FaMULATES THE THREE HERDER WORDS READ AND 
COMPARE THAT IS PART OF ALL DATA TRANSFER OPERATIONS. 


THE EXPECTED HEADER IS CALCULATED FROM THE CYLINDER, TRA 
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616 AND SECTOR SPECIFIED IN THE “L” REGISTERS. THE READING O 
pie So ORO aNAE Is Oe +l et of rhe tesore TO Se bont ONTERTS | 
619 OF RK I KED 0. THe NC RENT OF RK YL_AND RKDA 
620 veaikteh HF fe mee 14 G00" T nUREGISTERS AR 
621 ADDRESS IN CASE MULT Cc 
622 LOPRAT Pons. "Ke NEA Pere rOR RROR SIRED (BSEDES) SWITCH 
623 Is fgs M2" ANO IF IT IS NON- vo HE @ND AND 3RD HEADER 
624 WORDS Ec ACCORDING TO BSEDES CONTENTS. THIS 
at CAN BE aia TO FORCE HEADER TPE ERROR. 
627 CALL 
628 JSR RY, DHDCMP 
629 ERROR le ;ERROR IN MR1 
630 ERROR 13 +ERROR IN CSl 
pak ERROR 14 ? ERROR IN PACK ADDRESS 
633 HHH HK HHH EE EE EE EEE EE EEE 
634 DIAGNOSTIC MODE GAP READ AND SYNC 
pue HHH HH KE HE HHH EE HE HEHE EEE EEE EEE EE EE HE 
637 THE READING OF THE GAP AND WRITING OF THE SYNC (OR PREAM 
P38 IS HANDLED IN THIS ROUTINE. 
640 THE FIRST GAP BITS ARE PROCESSED IN THE HEADER COMPARE 
641 ROUTINE AND T Ba oS — PROCESSED HERE. THEN A 
bYHe CHECK IS MADE THAT WRITE GATE CAME ON AND 255 "0" BITS 
ay A SINGLE ats MBIT IS WRITTEN. 
bYS CALL: 
EYE JSR R4, DWGPSN 
647 ERROR is’ ;MR1L IN ERROR IN READ GAP 
648 RROR 16 ?CS1 IN ERROR AFTER READ GAP 
eas _ ERROR 17 ;MR1 IN ERROR IN WRITE SYNC 
Pes ERROR 20 3;CS1 IN ERROR AFTER SYNC WRITE 
653 ROUTINE CALLED: 
654 TBIT 
65S RETURN POINT IF ERROR IN WRTBIT 
656 NO ERROR RETURN 
eee 
659 KKK KERALA RRR KR AEKHEHRA RR RRERRRER 
660 DIAGNOSTIC WRITE DATA AND ECC ROUTINE 
aa! HHA HK KEKE RARE KHER RR KEEE 
663 THE DATA IN THE OUPUT BUFFER IS WRITE SIMULATED, ECC IS 
ped : Q GENERATED AND WRITTEN, AND THE POSTAMBLE IS WRITTEN. 
666 CALL: 
667 JSR ree DWRITE 
668 ERROR 17 ;MR1 IN ERROR IN WRITING 
669 ERROR el ;ECC ERROR IN WRITING 
670 ;CS1 ERROR AFTER WRITE 


ERROR ce 
671 NO ERROR RETURN 
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C2R6EB.P11 


7093 


NNNNNNNNSNNN NNN 
TON Rb hh beh be he 
—OWONOULSW-OwWON 


Oe-DEC-77 10:21 


nour INE ager Ee : 


RETURN P pofaT IF ERROR IN WRTBIT 
TURN FROM WRTBIT 


poceeeetie ar an oe ao Mane. 


DIAGNOSTIC MODE READ GAP AND 
eH He Ae Se SE HE SE Sa EH SE a a a a a aa a a 


THE READING OF _THE GAP_AND READING OF THE SYNC (OR PREAM 
IS HANOLEO IN THIS ROUTINE. 


THE FIRST GAP BIT an PROCESSE se IN HEADER COMPARE 
ROUTINE AND T tof a GAP tt Ra ane i HERE . 
THEN HECK IS MADE THAT READ GATE C 
ngs 129TH BIT OF SYNC.;# 
JSR R4 , ORGPSN 
ERROR 15 ;MR1 IN ERROR IN READ GAP 
ERROR 16 ;CS1 IN ERROR AFTER READ GAP 
RROR 32 ;MR1 IN ERROR IN READ SYNC 
OR 33 ;CS1 IN ERROR AFTER SYNC READ 
ROUTINE CALLED: 
JSR PC,ROBIT 


pensesquequovantperetessnesouasese err nr aati 


DIAGNOSTIC READ DATA OR DIAGNOSTIC WRITE CHECK ROUTINE 
96 He He Ae A HE HE eA A A a a a a a aa a a a a a a a a a a a a a 


THIS ROUTINE IS USED TO SIMULATE THE READ OR WRITE CHECK 
OF DATA. THE ROUTINE WILL TRANSFER A FULL OR PARTIAL SEC 


THE FIRST yoRD AFTER THE CALL SPECIFIES HOW MANY WORDS 
RANSFERRED. 


ARE TO BE T 
IF LESS THAN AF L SECTOR THE ECC AT THE END 

OF THE TRANSFER v6 NOT CHECKED. THE ECC IS CHECKED AT TH 
EACH BIT IS TRANSFERED. 

EITHER 16 OR 1 T WORDS CAN BE SIMULA ATED 

DEPENDING ON T TATE Cent BIT IN E81. IF 18 BITS 
ARE REQUIRED, 16 AND 17 ARE AS 0 TO BE ZERO. 


THE END OF THE DATA TRANSFER. THIS 
MUST OCCUR BEFORE THE ROUTINE IS CALLED. 


ANOTHER LOCATION, ECPATX, IS ay TO O IF THE ECC IS EXPE 
TO BE CORRECT AND SET TO’1 IF AN ERROR IS BEING FORCED. 


A 3RD LOCATION, ECCSRC, SPECIFIES THE SOURCE OF THE ECC 
WORDS TO BE USED IN CHECKING THE OPERATION. IF ECCSRC IS 


TENTS OF cS a OCATION ECPOSX MUST LOADED WITH THE 


COUNT E Se ais 


CO0e 


1s SEQ O015 
-DEC- :43 PAGE 
MACY11 30(1046) O2-DEC-77 10:4 
CZRGEBO_RKG11 DSKLS CTRL PRIS “hs 
C2REEB.P11l O2-DEC-77 10:21 ee ss rep we Ye sr pe ta 
re v EEF RBs PRN BE aRBUEEc Bo BBE et: 
i a RY. OR 
JSR 
- 3 TRANS! EfRi IN ERROR READING DATA OR ECC 
73 RR FECC ERROR ; 
: BR iE24 RECPSTER THcOR RcEREPLE PAE R BBB Ecc 
‘ERR IN ECC PA 
oe q SERN IN EGE POS COUNTING. 
739 
a DWRTCK 
JSR RH 
rs | TH.OF TRANSFER WRITE CHK OR ECC READ 
ee ERron s3 PORe ERROR IN WAITE CHECK 
ROR ed rECC RROR Ae, R IN WRT CHK OR ECC READ 
ns ERROR at ;ECC REGISTER INCORRECT AFTER READ ECC 
: sERR IN PA 
ns caro Ne 6 TERR IN CC Pal CALGAT 
7B ROUTINES CALLED: 
7s ROBIT 
oa ECCGEN 
754 
a 
* 
758 RERKRKKAERESRERRERRERERASKRAASA SARA RARE RRAERSRERARKRAARERELRELLE 
i: GENERATE ECC WORD  sunecenecesssnneeusnucesaouseosneneneenceueees 
Aa Se ATED F 
72 EACH TIME THIS ROUTINE IS Fe THE ad Saesare® F 
ts RES BA ult fen"teYoReoMGd FES nd" EcEtSS piace 
7ee i Meir OF EC CN TE ee TE capt FoR EASY CO 
oe 
768 PC, ECCGEN 
te Sibin: A : 
PERLE RESZRE 
ae: RKEKRKKRAKRKSSSKRSKSSERSERSRRSRERSESARRRRREEE 
He SIMULATE ONE GIT OF WRITE DATA IN MAINTANENCE MODE a eae 
A l BELLE RESES 
e S05 BS FTT OF BETAS MUTE PTAATED- ILE SPENES, un 
a RAGPPERGHEL'E EEO" nd Sg PEcBrah Pale MRO Se, TE 
766 RECT AT ANY TRANSITION ST UP TO 
781 bs Wtntae A MESSAGE THAT IDENTIFIES THE TRANSITION 
782 


ERROR OCCURRED. 
783 
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REY ban: APE Bey grrerT FOR NO ERROR RETURN 
RTS PC FOR ERROR IN MRI 


REKRKRRARAEKERAAAEERRLEERAEREEAAAARRAAAA LARA ASAE AALAARRRRRER REALE ES 


SIMULATE ONE BIT OR READ DATA IN MAINTENANCE MODE 
36-36 3-36 46 A Ae SE SSE SE a a a a a a a a a a a a aaa 


ONE BIT OF DATA IS READ SIMULATED. NO CHECKING IS 
DONE BY THIS ROUTINE. 


CALL: JSR PC,RDBIT 
RETURN: RTS PC 


ne a ee 


MEMORY CHECK ENABLE 
3k 36-36 eS SE SE 6 6 eH A J a a a a a a a a a a a aaa a aa 


TF aves Pee enaeced Hats ROUTENE WILE PROCESS FRAPS caus 


Y MEMORY PARIT 
REKKKLGREAK ERAGE ERE E ERE RARER EAERE RAE EEARAE REAR ERRRREE LER 
CLEAR INPUT BUFF 
MEH HE EE EE EE RRR EERE EERE EE 
HME EH EE EE EE EER RRR EERE EERE EEE EE 


BUILD DATA BUFFER 
3 36 3 36 9 AE 3 EB a a A a a a J a a a a a a a a a a a a a a 


THE PATTERN BN i Tae Bo IN THE CALL IS LOADED INTO THE DAT 
BUFFER. FER 1S ALWAYS LOADED (400(8) WORDS 


9G AE 3k 6 HS AE SE SE EE AE 9 a a a a A a a a a a a a aa a a a aa 
LOAD “L” REGISTERS 
96 3 6 36 Se aE SE eH HE 8 6 0 a a a a a a a aa a a a a a a a aa 


HE “L™ REGISTERS ARE LOADED FORM THE PARAMETERS plone 


The SURBDUTANE SSAeb; .PERORGE AGAmaRg 15 SEF IN CAR 


SeR* RY, LOADRK 

- ORD coe RORF 

ease mess 

"WORD COMMAND, FORMAT, DRIVE TYPE,8UPPER BUS AD 


BG TURN: 
RTS RY 


E02 
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840 9k He HE HE He HE SE eS SE A Se EH a a a 

841 START THE OPERATION 

as 36 eS SE SE eH SE A SE eS 9 0 A a a a a aa 

844 THE INFORMATION IN THE “L”™ REGISTERS ARE LOADED INTO THE 

Bue RK611 REGISTERS IN A STARAIGHT TRANSFER. 

847 He SE HE He HE HE HE A HE 0 a a a a a a a a a 

848 . > GET THE RK611 REGISTERS 

a 36 Me SE SE Se SE HE Se A SE HS a a a a a a 

8S1 ALL THE RK611 BESTS TERS EXCEPT THE DATA BUFFER ARE 

ges STORED IN THE “T” REGISTERS. 

8S4 36 Hee HE SE JE JE HE ES a A a 9 9 A a a ao aa 

gSS “FIRST SHALL BE LAST, LAST SHALL BE FIRST” SUBROUTINE 

gee JUG HEHEHE HBHBHHHHHHEHEBHBHEHBHH EHH EHHHEHEHEHEHEHEHBHEEHEHE HEHEHE 

8S8 THE CONTENTS OF R3 IS SWAPPED END FOR END, I.E. BIT 15 

859 BECOMES BIT O AND VICE VERSA,BIT 14 BECOMES BIT 

a 1 AND VICE VERSA, ETC. 

862 CALL: 

863 JSR RY, FSBLVV 

ged ; WITH R3 LOADED WITH THE WORD TO BE SWAPPED 

866 RETURN: 

867 

a4 WITH R3 SWAPPED. 

870 3-36 3 HE SE eH SE AE SE HE JE ES SE EE A A 9 SE 

871 CHECK FOR MEMORY CHECK ENABLE 

872 . HEHE SE SE HE HE He SE SE HE SE ES HE SE EE JE SE J HE AE SE ES EE EE A HE SE SE EE HE EH HEE HE HE EE HE 


oe aS. 
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: *##% REV OO #%% 
"NLIST am» MD, MC 


LIST 
* ENBBL ABS AMA 
$SWR= 167400 


STN= i 
TITLE CZR6EBO RKbil DSKLS CTRL PRTS 
*xCOPYRIGHT (C) 1976,1977 

i xDIGITA EQUIPMENT CORP 

i *MA , MASS. 01754 

j FPROGRAN BY MARV TEGROTENHUIS 


THIS PROGRAM WAS ASSEMBLED Sing THE POP-11 MAINDEC SYSMAC 
| aPackace (MAINDEC-11-DZQAC-C3), JAN 19, 1977. 


Serte OPERATIONAL SWITCH SETTINGS 


: % 

i SWITCH USE 

3% 15 HALT ON ERROR 

r 14 LOOP ON TEST 

;% 43 INHIBIT ERROR TYPEQUTS 

:# 12 ABORT PRO AFTER 20 ERRORS 
14 11 INHIBIT ITERATIONS 

5 19 BELL ON ERROR 

te ON TEST IN SWR<7:0> 


OOP 

L c N IN 

. SBTT a DEF INITIO : 
*#INITIAL ADDRESS OF THE STACK POINTER ### 1100 ### 


at TACK= 

-EQUIV EMT,ERROR ;;BASIC DEFIN TION OF ERROR CALL 
[EQUIV IOT; SCOPE ;;BASIC DEFINIT OF SCOPE CALL 
:#MISCELLANEOUS DEFINITIONS 

hits 11 33 FOR HORIZONTAL TAB 

LF= 1 >3CO FOR Li FEED 

CR= 1 >;CODE F IAGE RETU 

CRLF= 200 ?:CODE FOR CARRIAGE RETURN-LINE FEED 

PS= 77776 ?:PROCESSOR STATUS WORD 

-EQUIV PS,PS 

STKLMT= 177774 ;;STACK LIMIT REGISTER 

PIRQ= 77772 : PROGRAM INTERRUPT REQUEST REGISTER 

DSWR= 77570 ::HARDWARE SWITCH REGISTER 

ODISP= 177570 + HARDWARE DISPLAY REGISTER 


Ao= %0 ; RAL REGISTER 
Ri= %1 + OE NERAL Ret STER 
R2e= %2 >:GENERAL REGISTER 
R3= %3 ;;GENERAL REGISTER 
R4= “4 j GENERAL REGISTER 
RS= 4S ?:GENERAL REGISTER 
Ro= %b GENERAL REGISTER 
R7= “2 !:GENERAL REGISTER 


SEQ 0018 
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Pil 
930 ooo006 SP= % ;;STACK POINTER . 
330 000007 PC= %? : PROGRAM COUNTER 
93 -¥PRIORITY LEVEL DEFINITIONS 

934 oo00000 PRO= 0 ;;PRIORITY LEVEL O 
935 000040 PRi= 40 ::PRIORITY LEVEL 1 
93 0100 PRe= 100 ; PRIORITY LEV Le 
33 0140 PR3= 140 ::PRIORITY LEVEL 3 
938 000200 PRY= 200 ::PRIORITY LEVEL 4 
33 et pres Sa8 LIDRISRETY LEVEE § 
aut 000340 PR7= 340 : PRIORITY LEVEL 7 
943 -*#"SWITCH REGISTER” SWITCH DEFINITIONS 

44 100000 SwisS= 

Sys 040000 Sw14= 

946 020000 SwWi3= 2000 

947 010000 SWi2= 10000 

948 000 4 SWil= 4000 

443 002000 ~ SWid= 2000 

350 001000 Swos 1000 

951 0400 Swos= 400 

952 90 SwO7= 200 

953 0001 SWOb= 100 

954 040 Swos= 

95S 000020 Swo4= 20 

956 000010 Swo3= 10 ‘ 
957 0004 SWO2= 

958 ooo002 SWwOl= 2 

959 000001 Swoo= 

960 “EQUIV SWOS,SW9 

961 “EQUIV SWO8, SWE 

962 “EQUIV SWO7,SW7 

963 [EQUIV SWO6; SWE 

964 [EQUIV SwWOS; SWS 

ace “EQUIV 3) Sus 

96 [EQUIV 3" We 

968 [EQUIV Sw 

363 "EQUIV SwOO,SWO 

971 , DATA BIT DEFINITIONS (BITOO TO BITIS) 
972 1000 B 1S= 1090 0 

973 040000 Tl4= 0 

974 020000 BIT13= 20000 

375 010000 BITle= 10000 

976 0040 BITil= 4000 

377 002000 BIT1O= 2000 

978 001000 B1T03= 1000 

979 000400 BITOs= 400 

980 000200 BIT07= 200 

981 0001 BITOb= 100 

982 000040 BITOS= 40 

983 000020 BITO4= 20 

984 000010 BITO3= 10 

98s 000004 BITO2e= 4 
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37 B68 EQUIV ap 
989 “EQUIV 8ITO8,BITS 
990 d Qu y 107, 1? 
BN AEBS 

994 “EQUIV B8ITO3,BIT3 
99S “EQUIV BITO2,BITe 
996 [EQUIV BITOI;BITI 
337 “EQUIV BITOO;BITO 
3 *xBASIC “CPU” TRAP VECTOR RODRESS Ss 
1000 oo0004 bRBVEES 4 ;;TIME OUT AND OTHER ERRORS 
1004 505 19 RESVE = 10 Hegy * AND ILLEGAL INSTRUCTIONS 
1003 000014 TRIVEC= 14 :: TRACE 

‘ p = 14 TRAP (BPT 
i Be bo00e0 Oty &= 0 Rong ne TRAP (LOT) **#SCOPE## 
1006 0024 PWRVEC= 24 
1007 990030 ENTVEC= ey See (EMT) **#ERROR** 
{BBS efetetet a TROEXE =24 iT Y KEYBBARD VECTOR 
1010 000064 TPVEC= 64 TTY PRINTER VECTOR 
1011 o00240 PIRGVEC =240 ' PROGR AM INTERRUPT REQUEST VECTOR 
1012 .SBTTL MEMORY sail DEFINITIONS 
1018 ;*KT11 VECTOR ADDRESS 
1016 000250 MMVEC= 250 
1018 ;*KT11 STATUS REGISTER ADDRESSES 
1020 177572 SRO= 177572 
1021 177574 SRi= 177574 
1022 177576 SRe= 77576 
1083 172516 SR3= 172516 
1085 ;*KERNEL “I” PAGE DESCRIPTOR REGISTERS 
1027 172300 KIPDRO= 172 
1028 172302 KIPDRi= 172302 
1029 172304 KIPDRe= 172304 
1030 172306 KIPOR3= 172306 
1031 172310 KIPORY= 172310 
1032 172312 KIPORS= 172312 
1033 172314 KIPDRb= 172314 
1034 172316 KIPDR7= 172316 
1038 *KERNEL “I” PAGE ADDRESS REGISTERS 
1038 172340 KIPARO= 172340 
1039 172342 KIPARI= 172342 
i040 172344 KIPAR2= 172344 
1041 172346 KIPARS= 172346 
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1042 172350 
1043 1723Se 
1044 172354 
104S 172356 
1046 

1047 000114 
1048 172100 
1049 0000 
1050 000001 
1051 120210 
10Se 000 
1053 177440 
1054 

1055 

1056 

1057 000 
1058 oo0002 
1059 000004 
1060 000006 
1061 000010 
1J62 o0001e 
1063 000014 
1064 000016 
1065 000 
1066 000024 
1067 00. 
1069 000036 
1070 000030 
1071 000032 
1072 000022 
1073 

1074 

1075 

1076 000001 
1077 000003 
1078 0000058 
10793 000007 
1080 001 
1081 000013 
1082 000015 
1083 000017 
1084 0000e1 
1085 000023 
1086 00002' 
1087 0000e7 
1088 000031 
10893 000300 
1090 

1091 

1092 

1093 000001 
1094 000100 
1095 000200 
i096 000400 
1097 001000 


TS 
1 


I0e 
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MEMORY MANAGEMENT DEFINITIONS 


KIPARY= 172350 , 
KI 


PARS= 1723Se2 
KIPAR6= 17235 
KIPAR7= 172356 
MEMVEC= 114 ;MEMORY PARITY VECTOR 
MEMBAS= 172100 ;MEM_ PARITY OPTION 
WR.PAR= 4 ;WRITE BAD PARITY 
PAR.EN= 1 ;ENABLE PARITY ENABLE 
AVECTI= 120210 ;DEFINE RK611 VECTOR ADDRESS 
APRIOR= S ;DEFINE RK611 PRIORITY 
ABASE= 177440 ;DEFINE BASE OF RK611 REGISTERS 


.SBTTL RK611 CONTROLLER REGISTER DEFINITION 


RKCSI= O ;CONTROL AND STATUS REGISTER 1 
RKWC= 2 :WORD COUNT REGISTER 
RKBA= 4 ?BUS ADDRESS REGISTER 
RKDA= 6 *DESIRED TRACK SEC REGISTER 
RKCS2= 10 :CONTROL_AND STATUS REGISTER 2 
mee fs Boag aucreeeress 
eos ’ 
RKASOF= 16 * ATTENTION Y AND OFFSET REGISTER 
RKDCYL=20 Dest 5 CYLINDER REGISTER 
RKDB= 24 :DATA F 
RKMRI= 26 : MAINT NANEE REGISTER 1 
are: 3 TRINTENeNGE RECLSTER 5 
~ ’ 

RKECPS= 30 *ECC PoeTT ORMATION 
RKECPT= 32 *ECC PATTERN INFORMATION 
RKSPAR= 22 ‘SPARE REGISTER 
.SBTTL DRIVE COMMANDS 
SELORV= 01 ;SELECT DRIVE 
PACK= 03 :PACK ACKNOWLEDGE 
Skt Seb BF ‘Tusiows 
SRTSPL= 11 ‘START SPINDLE 

CAL= 13 ; RECAL IBRATE 
OFFSET= 15 OF FSE 

EEK= 17 : SEEK 
RDDATA= 21 ?READ DATA 

RDATA= 23 :WRITE DATA 
ROHEAD= 25 :READ HEADER 
WRHEAD= 27 ‘WRITE HEADER AND DATA 
WRTCHK= 31 :WRITE CHECK 
INTR= 300 :GENERATE INTERRUPT TO CPU 
.SBTTL CONTROL AND STATUS REGISTER 1 BITS 
GO= BITO :GO BIT 
IE= BIT6 : INTERRUPT ENABLE 
RDY= BIT? ‘CONTROLLER READY ; 
BAl6= BITS :BUS ADDRESS BIT 16 
BAl7= BITS :BUS ADDRESS BIT 17 


JOe2 
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1098 002000 COT= BIT10 ;CONTROLLER DRIVE TYPE (O=RKO6) 

1099 004000 CTO= BIT11 ; CONTROLLER TIMED OUT WAITING FOR 

1100 ; _DRIVE RESPONSE 

1101 010000 CFMT= £BITle CONTRO’ DRIVE FORMAT (0=26 SECTOR, 1=24 SECTOR) 

1102 020000 SPAR= BIT13 ;DRIVE BUS PARITY ERROR DETECTED By CONTROLLER 

1103 040000 DOI= BIT14 ;ORIVE INTERRUPT 

1104 100000 CERR= BIT1S ;CONTROLLER ERROR 

110° 100000 CCLR= BITIS ;CONTROLLER CLEAR 

et .SBTTL CONTROL AND STATUS REGISTER 2 BITS 

1109 000007 DRYMSK= 7 ;MASK FOR DRIVE SELECTION CODE 

1110 000010 RLS= BIT3 ;DESELECT OR RELEASE DRIVE IN BITS 0-2 

1111 000020 BAI= BIT4 ;BUS ADDRESS INCREMENT INHIBIT 

llle 40 SCLR= BITS ;CLEAR CONTROLLER AND ALL DRIVES 

1113 000100 IR= BIT& ; INPUT_READY 

1114 200 = BIT? ; OUTPUT READY 

1115 000400 UFE= BITs ;UNIT FIELD ERROR 

1116 001000 MDS= BITS ;MULTIPLE DRIVE SELECT 

1117 002000 PGE= BIT10 Heed ba ERROR 

1118 004000 NEM= BIT11 ; NON-EXT ENT MEMORY 

1119 010000 NED= BITle ;NON-EXISTENT DRIV 

1120 00 UPE= BIT13 ;UNIBUS PARITY ERR 

llel 040000 WCE= BIT14 pH TE CHECK ERR 

iiss 100000 DLT= BITIS ;DATA LATE ERROR 

1163 -SBTTL ERROR REGISTER BIT DEFINITION 

1le6 000001 ILF= BITO ; ILLEGAL FUNCTION CODE 

11e7 000002 SKI= BIT1 ;SEEK INCOMPLETE 

1128 oo0c04 NXF = BITe ;NON-EXECUTABLE DRIVE FUNCTION 

1129 000010 DRPAR= BIT3 ; DRIVE gy 1 DRIVE BUS PARITY ERROR 

1130 000020 FMTE= BITY ; FORMAT OR 

1131 000040 DOTYE= BITS ;ORIVE TYPE ERROR 

1132 100 ECH= BIT6 ;ECC cone 

1133 000200 BSE= BIT? ;BAD cio RROR 

1134 0400 HVRC= BITS ; HE C_ERRROR 

1135 000 COE= BITS ;CYL R_ADDRESS OVERFLOW ERROR . 

1136 002000 IDRE= BIT10 ; INV PoRirE ADORESS ERROR 

1137 CO4000 WLE= BIT11 ;WRIT L K 

1138 C10000 DTE= BITle ;ORI IMING ERROR 

1139 000 OPI= BIT13 ;OPERATION (SEARCH) INCOMPLETE 

1140 040000 UNS= BIT14Y s DRIVE UNSAFE 

tis 106000 OCK= BITIS ;DATA CHECK 

ties -SBTTL STATUS REGISTER BIT DEFINITION 

1145 000001 DRA= BITO ;DRIVE AVAILABLE (CONTROLLER IS SET IF 

1146 ;__ THIS BIT IS RESET) 

1147 ooooo4 OFST= BIT2 ;ORIVE OFFSET 

1148 000010 ACLO= BIT3 ;AC_ LO ‘ 

1149 000020 SPOLSS= BITY ;SPEED LOSS 

1150 000040 DROT= BITS ;ORIVE OFF TRACK 

1151 000100 VV= BIT6 ; VOLUME VALI 

i1lSe 000200 DRDY= BIT7 ;ORIVE READY 

1153 000400 DDT= BITS ;ORIVE TYPE (O=RKO6) 
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000174 
000176 
000200 
000204 


000214 


ooo046 
o000S2 


BOVE LOH ODD VT LOH ODD VOU LOH Oe VOU LON OD UO EOE ODD TOUTE 


ae be ae be tae fe ee ee ne ee ee ee ee fe ee ee ns ss sn st ee ee ns ee Pe ns ee ee ae es ee ee ee ee Be fs se ee ee be Pe ne se 
POU IV he ee ee ee ee ee es ee ee ee ee ee ae ee ee ee ee ee ee hs ee ee ee 


004000 


100000 


000020 


000000 
000000 


000000 
000220 


002400 
002370 


002360 


MACY11 30(1046) 
STA 
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TATUS REGISTER BIT DEFINITION 
WRL= BITi1 WRITE LOCK 
PIP= BIT13 ! POSITIONING IN PROGRESS 
OSC= BIT14 ;DRIVE STATUS CHANGE 
SVAL= BiT1S ;STATUS VALID 
-SBTTL MAINTENANCE REGISTER 1 BIT DEFINITION 
MESMSK= 17 ;MESSAGE MASK 
PAT= BIT4 ; FORCE ven PARITY ON DRIVE MESSAGE LINES 
DMD= BITS ‘DI MODE 
MSP= BITé IDAINTERANCE SECT Pixon PULSE 
MINO= BIT7 fey tal 
MCLK= BITS ; MAINT 3 akira 
MERD= BITS ; MAINT NCODED READ DATA 
MEWO= BIT10 ;MAINTENACNE ENCODED WRITE DATA 
PCA= BIT11 ; PRECOMPENSATION ADVANCE 
PCD= BITle ; PRECOMPENSATION DELAY 
ECCW= =BIT13 ; WORD_IS BEING READ OR WRITTEN 
WRTGAT= BIT14 ;WRITE GATE 
ROGATE= BIT1S ;READ GATE 
-SBTTL TRANSMITTED MESSAGE A 
S.SEEK= BITY ;SEEK COMM 
S.RECL= BITS iS eeiies TE COMMAND 
S.STSP= BIT6 MAND 
S.RTC= BIT? CER Been TO lean COMMAND 
S.CLR= BITS OR AND D 
S.FMT= BITS 
2: it = Bitte teil 
S.PACK= BIT11 ;SET VOLUME VALID (PACK ACKNOWNLEDGE? 
SBTTL TRAP CATCHER 

-=0 

FALL UNU D LOCATIONS FROM 4 - 776 alt) A ee pi 4%; HALT” 

i ¥SEG NCE TO CATCH ILLEGAL TRAPS AND INTERRUP 

jXLOCATION 0. CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 


DISPREG: .WORD O ;; SOFTWARE DISPLAY REGISTER 
REG: -WORD O ;; SOFTWARE SWITCH REGISTER 


Si 

-SBTTL STARTING ADDRESS(ES) 
JMP a saregt ;; JUMP TO STARTING BOOS a OF PROGRAM 
aes RESTRT ; JUMP TO RESTART ROUTINE 


JMP PARM ; JUMP TO OPERATOR ASSIGNED PARMETERS 
-SBTTL ACT11 HOOKS 


= RRR GRE SERRE REEL REAR EERE ARR RRRARRRA ARERR EARERRAR RAR RRKRARERE 
HOOKS REQUIRED BY ACT11 
$SVPC= ;SAVE PC 


.=46 

SENDAD ;;1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 
"WORD O ;;2)SET LOC.S2 TO ZERO 

" =$SVPC tt RESTORE PC 


SEQ 0023 


LOe 


CZREEBO. RK611 DSKLS CTRL PRTS MACY1LI1 39¢ 104 6) O2-DEC-77 10:43 PAGE 24 SEQ 0024 
CZ2R6EB.P 02-DEC-77 10:21 T11 HOOKS 

1210 000114 . =MEMVEC 

1211 000114 031726 MEMERR 

lele 000116 000340 PR7 

lel 001000 .=1000 

1e18 .SBTTL APT PARAMETER BLOCK 

1618 fs peesngoegensengatenssascenteseseer seen 

lel SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 

1518 praneene ee Lae ae 

lel 001000 .SX=. ;;SAVE CURRENT LOCATION 

1220 000024 7224 piper POWER FAIL TO POINT TO START OF PROGRAM 

1221 000024 o00200 2 : APT T uP 

1222 000044 =44 ;;POINT TO APT INDIRECT ADDRESS PNTR. 

1223 000044 9001000 SAPTHDR POINT TO APT HE 

1204 001000 ET LOCATION COUN T 

lees _snueavaiziDeaeadite ee aoe Ot GOON ER sanauszenexerarenstarets 

1226 TUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 

1287 Fe TUE Aes SPEC. 

1229 001000 SAPTHD: 

1230 001000 p90900 SHIBTS: .WORD en 5 3 TWO O HIGH BI BIT MAILBOX ADDR. 

1231 001002 O01e50 SMBADR: .WORD MAIL Box (BITS 0-15) 

1238 901008 000132 $TSTM: .WORD RUN TIM F eoeet? res 

1534 001010 dbo;44 SONTTN: “WORD ROD TION Me’ (SECS) OF, R PASS FOR EACH ADDITIONAL UNIT 

1832 BBi8t8 eieteteeta ‘ OR B [DP eo -shigPe TOnak RUN nai ng, (SESS), OF APRS DS) 


ooeen p —— OSKLS CiRL PRTS 
O02-DEC-77 10:21 


CZR6 


pani 
8888888888 888 


yi 


pe ab 


8888 888888888ssss 


o 
<£ 


rurorororurorurorurofururuornr 


BU LoN Own Vo 


SEER ES 
SSSSSSS8E8 


ee ee a ee he ee be be ee he be ee ee 


3508 
-—. 
ee ee ee ae ee ee ee ae ee ee ee ee ee ee ee bn 


+ 


== 
—_- 


FUrUrureruronuryty fire rere ne Re oe yy Dee ee pet Be be ee ee 
NOT LVOFENGTLNOPLD ONTULVOR LEVON LENORE VOR EVOL GOS 


Oo 
oO 


Cc) Cx 
- 


Oo 
oa 
~ 


Ecole 


00 
000000 


MACY11 30(1046) 
COMMON 


02-DEC-77 
TAGS 


.-SBTTL COMMON TAGS 


= 3G SE SE EAE JE SES SE SE A A SE EJ SE 9 a a HH aH 
SATHIS TABLE yy ddd be VARIOUS COMMON STORAGE LOCATIONS 
;*USED IN THE PROGRAM 


SAUTOB: : 


STMP1O: : 


-=1100 


P 


oD 


W 
DI 


fu 


COOOOOOCOOOOOC00000 820-voO 


10:43 PAGE eS 


;;START OF COMMON TAGS 

Health: cRon Flag oe 
USSHAINS BEBPE hoon Pk Eanns 

rans THER CONTROL BYTE. 


Stat eee re Oot “ggyguertn 
Hea 


RESERVED--NOT TO ae USED 


 auTonarze MODE INDICATOR 
; INTERRUPT MODE INDICATOR 


;ApoRess OF SWITCH REGISTER 


Hie ow REGISTER 


ett pain BOORESS 

s31TY PRIN BODRESS 

t ConTal LLS 

bec bs FE REQUIRED 
AFTER A “LINE FEED” 

s kaa (B1T<07>=0=YES) 


TAINED 


ae 
oie 
ae 
oe 


See Oe 

im 

DDD 

cece 
Ce eee ee Te ee 


~- 
w 
m 
Zz 
o00 
mmm 


SEQ 0025S 


| CZREEBO RKGLI OSKLS CTRL PRIS 


292 001224 

29 1226 

ie ae 

{See Botsaa 

1237 00123 
ie 

138 Botsuq 

1300 001245 

1301 O01e4%6 

1302 

1303 

1304 

1305 

1308 

1307 001250 

1308 001250 

1309 001252 

1310 001254 

1311 001 

1312 O01 

1313 Bo1ses 

i3i¢ Boise 

1316 001270 

1317 001270 

1318 OOle71 

1319 001272 

1320 001274 

1321 001276 

1322 

1323 

1324 

1325 

1326 

1327 

1328 001300 

1329 001301 

1330 

1331 

1332 

1333 

1334 001302 

1335 

1336 001304 

1337 001305 

1338 001306 

1339 001310 

1340 001311 

1341 001312 

1342 001314 

1343 001315 

1344 001316 

1345 001320 

i346 001322 

1347 001324 


O2@-DEC-77 10:21 


oo0000 
See 
0000 
000 


000000 
17780e 000377. 
077 


01S 
oo00le 


poog 


000000 


000 
000 


oo0000 
000 


177440 


NOe 


10:43 PAGE 26 


3; MAX. NUMBE 
;;ESCAPE ON ERROR ADDRE 


b> etmatelaleaiaiel + COPE TON 2) 


MACYiis 30(1046)_ O2-DEC-77 
COMMON TAGS 
STMP11: .WORD QO 
STMPie: .WORD O 
STMP13: .WORD OQ 
STMP14: .WORD 0 
STIMES: O 
SESCAPE : 0 
SELL: .ASCIZ 
SQUES: .ASCIT 
SCRLF: .ASCII “18 
SLF: - ASC 


SCIZ > 
STrrriritttittrttiti titi tite 


I 
j | CARRIAGE RETURN 


'8TTL APT MAILBOX-ETABLE 


$V 
SBASES 


: iW 
WORD 


AENVM 
ASWREG 
AUSWR 
ACPUOP 


AMAMS 1 
AMTYP1 


SaaS RAEAAEAS 


bege eee ee wees eseseseses 


APT MAILBOX 

MESSAGE TYPE CODE 

FATAL ERROR NUMBER 
NUMBER 


=07, Q@=10 
* CLOCK 


M.S. BYTE 


#*O22 
~~ ANAS 


co 
2 
-_— 
<2 
< 
+ 
m 


naa Sa 


RESS,B kay 
rT nLeST VECTOR#1. BUS PRIORIT 
: INTERRUPT VECTORSSBLIS PRIORITY 
::BASE ADDRESS OF EQUIPMENT UND 


z= 


R OF Tener igs 


eL FEED 
et rrr Pee eer Ee Ter TTT Tr TTT rent 


© 36-3 36-36 SE ESE ESE HE HE SE SE HE SE HG HE He eH HE HEE HE HE HE HEE EE HE EEE RE RAK KR RERR EE 
N 


a 

I 

ING POINT PROCESSOR 
sin5- BYT NT 


Ab 
#2 
ER TEST 


SEQ 0026 


Gs0]. ogca7 at 11720=03, 11740=04, 1174S=05 


. TYPE =- (HIGH BYTE) 
Vs ise 
ane 5Y BYTES, THIS WORD AND LOW OF “TYPE” ABOVE 
K 
ere 
BYTE 


BO RK611 OSKLS CTRL PRTS 
B.P11 Oe@-DEC-77 10:21 
348 001326 000000 
333 001330 





MACY11 a 2 046) gee C-77 10:43 PAGE 27 SEQ 0027 


MAILBOX-E TABLE 
SOEVM: .WORD ADEVM ;;DEVICE MAP 
SE TEND: 
.MEXIT 


cee pe OSKLS co Deel 


382 


to 
(Ruan UMM 
NO UILW 


uy 
-Ow0M 


patty 


SRST Eat hitb iat PA RERRRARSIA Acasa 4 


6ses 8s8es 8888 8888 8888 8888 


Os ee bb bb Bb bb bb bb be be he fe he Be he Be Be be be he he Be be ho eb pe 
ek oe 
L£ELL 
pe pe 


£ELSLCLCCL£ 


PAPO 


8 
a 


S388 8 
WWWW WwW 
R288 8 


eT ed ed ed et 


Re ind PERE RUE F222 


aera 
> 
RE 


bo be be pe 


orcMo 


Oo 
oO 
ra 
<= 
fu 
Oo 


02-DEC-7 


04013 


043163 


MACY11 30(1046) 


O02-DEC 


-77_ 10:43 PAGE 28 


ERROR POINTER TABLE 
-SBTTL ERROR POINTER TABLE 


LETHE NPORReT ton 


SL Otat ION SITEMB 


t ENOTES! 


' 
’ 

5@ 
3% 


SERRTB: 


RROR 7 
mMSOO4 
ESOO4D 


Brood? 
RROR 10 
MSO10 


SIPIRS oY BE RPLLON, FP ERR MATRRDH TY OUR 


BLE IS PERTINENT. 


FECA TEER $8 Fue taBle“cORPAINE'S BGIRrERs BRBCATAED As FoLLous: 


;;POINTS TO THE ERROR MESSAGE 


FE PQENTE 18 THe pata HEADER 


;;POINTS TO THE DATA FORMAT 


; UNEXPECTED PARITY ERROR 


; UNUSED 
; UNUSED 


;ERROR ATTEMPTING IMPLIED SEEK 

;CS1 IN ERROR 

;MR1 IN ERROR ATTEMPTING IMPLIED SEEK 
;MR2 IN ERROR ATTEMPTING IMPLIED SEEK 


;MR3 IN ERROR ATTEMPTING IMPLIED SEEK 


;MR1 ERROR READING PREAMBLE 


SEQ 0028 


top alrite DSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 29 Seo odes 


OT00e1 


— 
<t 
o 
fu 


CZR6EB.P11  O02-DEC-77 10:21 ERROR POINTER TABLE 
1497 681588 83783 
14 4 3 . 
ike 14 01 OFO010 
ne na - ; EReoio ;CS1 ERROR READING PREAMBLE 
ee 
141 Boi4ae 3078 SOO4A 
1414 001434 037600 OTOO11 
1415 001436 0202 DFQO11 
11 aoeual quapeh ; ERROR 12 ;MR1 IN ERROR HEADER READ/COMPARE 
Itza oOlu4a G375e2 BTOo10 
ee 
1481 Bowe aol OFO010 
{34 : ; FRET 13 ;CS1 IN ERROR HEADER READ/COMPARE 
4 Boives 3512 S004 
1426 001454 037600 OTOO11 
Ie? OO1456 O4Oe0e DFOO11 
1433 ecend ecamel ; ERROR, 14 ;PACK ADDRESS ERROR HDR READ/COMPARE 
1431 001462 043316 ESO11A 
1432 001464 037624 DTO014 
1433 OO1466 040232 OFOO14 
ie ont none ; ERROR, 15 ;MR1 ERROR READING GAP 
1437 001472 043034 £50048 
1438 001474 037562 OTO010 : 
1439 001476 040156 DFOO10 
. ih ; ERROR 16 ;CS1 ERROR AFTER READING GAP 
ie Bigs Gas sch 
fie Blea Bt BPs 
144 : ERROR 17 ;ERROR_IN WRITING 
1448 001510 o00000 Emu: 0 ?REGISTER IN ERROR AND CLOCK 
{323 Bats 88 a8 By a : TRANSITION IS IDENTIFIED 
1451 Bbizie Bas rool? 
1483 an penal ; ERROR 20 ;ERROR IN CS1 AFTER WRITING SYNC 
te 
4 001522 3 ? 4A 
456 001 3 11 
14 001 FOO11 
i4e9 RROR 21 ERROR IN ECC WORDS 
[426 001530 o43462 ; MSOe1 ‘ : 
i461 001532 ESO21A 
001534 


043530 
037662 


MACY11 30(1046) O2-DEC-77 10:43 PAGE 30 


KLS CTRL PRIS 
CZREBO_AKG11 OSKLS CTRL PRIS ERROR POINTER TABLE 


CZR6EB.P11 0e-DEC-7 


1463 001536 040302 DFOO21 
1465 ; ERROR 22 ;ERR IN CS1 AFTER WRITE DATA 
1466 OO1S4O O43462 EMSOe1 
1467 O01 54e 043015 ESOO4A 
1468 1544 037600 DTOO11 
68 001546 040202 DFOO11 
oF 
; RROR 23 ;ERROR IN MR2 
1493 D015SO 043560 Encoe3 :DOING MULTI-SECTOR WRITE , 
Bo1e 
iid Golees E700 ag 
1475 Boieee 040106 DFOO0& 
; RROR 24 ;MR3_IN ERROR 
1458 901569 043560 ERcoe :DOING MULTI-SECTOR WRITE 
1479 1562 043072 ESOO4D 
1480 DO1564 037552 T0007 
14 1 001566 040132 F0007 
;CS1_IN ERROR 
1484 001570 943560 Ensoca AFTER MULTI-SECTOR WRITE 
1485 001876 Ou 015 ES004A 
1486 001574 037514 0004 
1487 001576 040032 DFOOO4 
1489 ERROR 26 
1490 901600 044200 2 EMSO26 ;NO COE ERROR 
1491 1602 0000 EHO26: .WORD 
1492 001604 037674 TOO26 
1433 001606 0326 0026 
7 
tOGe 001610 044340 ; ERege7” ;OTHER ERROR WHILE FORCING COE 
iige GBiels Sie prose 
1439 Bolete 040326 0026 
: R 
1263 001620 o44512 ‘ ERCos0.~ ;UNEXPECTED CYL OVERFLOW 
1503 001bee 00 EHO30: .WORD 
1504 1624 037674 OT0026 
12be 001626 040326 DOF O026 
; RROR 31 
1209 001630 4605 7 Ecos ;UNEXPECTED ERROR TESTING COE 
1509 00163¢ 0000 EHO31: .WORD O 
Hel? oolese Bio8ee Sroset 
1213 ; RROR 32 ;MR1 ERROR READING DATA SYNC 
1514 001640 044672 MSO32 
1515 001642 043034 ESOO4B 
1516 OO1644 037562 OTO010 
i817 001646 O40156 OFOO10 


FO3 


CZR6EBO RKG11 DSKLS CTRL PRTS MACYI1 30(1046) O2-DEC-77_ 10:43 PAGE 31 SEQ 0031 
€2R6EB.P11  O2-DEC-77 10:21 ERROR POINTER TABLE 

1519 ; ERROR 33 ;CS1 ERROR AFTER READING SYNC 

1520 001650 044672 EMSO32 

1521 O01652 04301 ESOO4A 

1S2e O01654 6 OTO011 

1523 001656 O40e 

1525 ; ERROR 34 ;MR1 IN ERROR READING DATA OR ECC 

1526 901 4750 MSO34 

1 0016: 3034 5004 

1 OO1664 0375be br0010 

1529 O01666 O40156 OFO01 

153 ; ERROR ;ECC ERROR READING DATA 

1532 001670 O¥S015 EMSO3S 

1 167 3530 ES021A 

1534 001674 037662 DTO0e1 

1535 001676 040302 FOO21 

1238 ; ERROR 36 ;CS1 ERROR AFTER READING DATA OR ECC 

1538 001709 044750 EMSO34 

1539 001702 043015 ESOOYA 

1540 001704 037600 OT0011 

1541 001706 oy0e0e OFOO11 

1543 ; ERROR 37 ;DATA COMPARE ERROR (1ST MESSAGE) 

1544 001710 o4sOSe EMSO37 

i545 O0171e O4le32e DHOODA 

1546 001714 037716 010037 

1547 001716 O4036e OF 0037 

1549 ; ERROR 40 ;DATA COMPARE ERROR (2ND THRU LOTH ERR) 

1550 001720 0 

1551 001722 o00000 0 

1552 001724 037722 OTOO4O 

1583 001726 O4040e OF OO40 

1555 ; ERROR 41 

1586 001739 O4s132 EMSO4 ;ECC REGISTER INCORRECT AFTER ECC READ 

1557 001732 O4le3e DHOOO 

1558 001734 037730 OTOO41 

1559 091736 ON4O40E OFO041 

1561 ; ERROR 42 

1562 001740 045217 EMSO42 ;ERROR IN ECC PAT CALCULATION AFTER ECC ERROR 

1563 001742 32 DHOOOA 

1564 001744 037662 DTO0e1 

1565 001746 426 

1566 

1567 ; ERROR 43 

1568 001750 04530 EMSO43 ;ERROR IN ECC POSITION COUNTING AFTER ECC ERROR 

1569 001752 041232 OHOOOA 

1570 001754 037746 DT0043 

1671 001756 040446 DFOO43 

i$73 ; ERROR 44 

1574 001760 045357 EMSO44 ;ERROR AFTER PROCESSING DATA CHECK ERR 


03 


CZR6EBO RK611 DSKLS CTRL PRTS MACYI1 30(1046) O2-DEC-77_ 10:43 PAGE 32 SEQ 0032 
CZR6EB.P11  O2-DEC-77 10:21 ERROR POINTER TABLE 

175 001762 043015 ESOO4A 

1576 001764 037514 DTOOO4 

1577 001766 040032 OF 0004 

1579 ; ERROR. 45 

1580 001770 045357 ;ERROR AFTER PROCESSING DATA CHECK ERR 

1581 00177e O43111 Freee 

1s8e 001774 03776 

1 001776 O40466 . 

1584 

1585 ; ERROR 46 

1586 002000 042751 EMSOO46 ; TRANSFER LENGTH ERROR PARTIAL SEC READ 

1587 O02002 041232 DHOOOA 

1588 037770 DTOO46 

1589 002006 O405ie DFOO46 

1591 ERROR _47 

1243 oe010 ousse EMSO47 ;BSE DID NOT PREVENT DA OR DC INCREMENT 

1533 O0e012 04331 ESO11A 

1594 002014 037624 DTO014 

1595 O0e016 o40e32 DFOO14 

1249 ; ERROR SO 

1598 045614 EMSOSO ;BSE DID NOT CAUSE CERR 

1599 OO02022 043015 ESOO4A : 

1600 O02024 037514 DTOOO4 

1601 02026 40532 OF OOSO 

1603 ; ERROR 51 

1604 002030 045667 EMSOS1 ;BSE FAILED TO SET WHEN EXPECTED 

1605 002032 043111 ESOOYE 

1606 002034 027760 DTOO4S 

1607 040466 DFOO4S 

1609 ; ERROR 52 

1610 002040 O45744 EMSOS2 ;DATA XFER ABORT TO SOON 

1611 o412 DHOOCA 

1612 O02044 03777 DTOO4 

1613 O02046 o4051e DFOO46 

1615 ; ERROR 53 

1616 902050 046064 =MSOS3 ;MR1 ERROR IN WRT CHK OR ECC READ AFTER WRT CHK 

1617 O0e0S5e 043034 50048 

1618 002054 037562 DT0010 ‘ 

1619 002056 040156 OFO010 

162: ; ERROR S4 

1622 002060 153 EMSOSY ;ECC ERROR IN WRITE CHECK OP 

1623 O0206e 043530 ESO21A 

1624 002064 037662 OT00e1 

1625 002066 040308 OF 0021 

1627 ; ERROR 5S 

1628 002070 O46064 M5053 ;CS1 ERROR AFTER WRT CHK OR ECC READ IN WRT CHK 

i629 002072 043015 SOO4A 

1630 002074 037600 DT0011 
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Sa Ata ae ibaa a eS 
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MACY11 30(1046) 


AAA AA AAA AAA 


§ 


PY: 


AR: 


O02-DEC-77 
ERROR POINTER TABLE 


DFOO11 


ERROR S6 
EMSO34 


ets 


DFOOO4 
ERROR 60 


TESRART STORAGE FOR m6 CONTROLLER 


OOOO 0O 00000000000 


Wl 

- WOR 
. WOR 
. WOR 


10:43 PAGE 33 
;CS1 ERROR AFTER READ DATA OR ECC 
;CS1 ERROR AFTER WRITE CHECK OR ECC READ 
;WCE FAILED TO SET IN 16 BIT MODE 
; TRANSFER LENGTH PROBLEM - RKBA 
; TRANSFER LENGTH PROBLEM - RKWC 


;WCE FAILED TO SET IN 18 BIT MODE 


GISTER 
ees Rear ue REGISTER 1 
D COUNT REGISTER 


gus oa REGISTER 
Ma RS 


RY AND OFFSET REGISTER 
FER eos REGISTER 


REGISTER 1 
MAINT ats | REGTSTER 2 


Bee "Brae FORMA TION 


MATION 
;SPARE REGISTE 


SES 0033 


03 
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PAGE 34 
EXPECTED RK611 CONTROLLER REGISTERS 
.SBTTL EXPECTED RK611 CONTROLLER REGISTERS 


E.CS1 -WORD O ;CONTROL AND STATUS REGISTER 1 
E.WC: -WORD O ;WORD COUNT REGISTER 
E.BA: «WORD O s BUS SS REGISTER 
E.DA: -WORD O ;DE RACK SECTOR REGISTER 
E.CSe: .WORD O ;CONTROL AND STATUS REGISTER 2 
—.DS: -WORD OQ sR TATUS REGISTER 
E.ER: -WORD OQ 3E GISTER 
E.ASOF: .WORD O ;ATTENTI 'Y AND OFFSET REGISTER 
E.DCYL: .WORD O j DESIRED ¢ INDER REGIST 
BOB: - WORD e ;DATA E 
-MR1: .WORD ;MAINTENANCE REGISTER 1 
e- Gne: WORD OQ ; MAINT ne GISTER 2 
E.MR3: .WORD O ; MAINTENANC GISTER 3 
E.ECPS: .WORD O ;ECC POSITION INFORMATION 
E.ECPT: .WORD O ;ECC PATTERN INFORMATION 
E.SPAR: .WORD 0O ;SPARE REGISTER 
.SBTTL “L™ REGISTERS FOR COMMAND START 
L.CS1: .WORD O ;CONTROL AND STATUS 1 
L.WC: -WORD O ;WORD COUNT 
L.BA: -WORD O ;BUFER ADDRESS 
L.DA: ; DESIRED 
L.DS: -BYTE O ; SEC 
L.OT: -BYTE O ; K 
L.CS2: .WORD O s CONTROL AND STATUS 
L.ASOF: .WORD 0O ;ATTENTION AND OFFSET 
L.OCYL: .WORD O ;DESIRED CYLINDER 
L.MR1: .WORD O ;MAINT. REG 1 
L.MRe: .WORD O ;MAINT. REG 2 
L.MR3: .WO 0 ;MAINT. REG 3 


.SBTTL PROGRAM DEFINED VARIABLES 


RKVEC: .WORD 210 ;RK611 VECTOR 
RKPRI: :WORD PRS :RK611 PRIORITY 
TRAPPC: [WORD 0 :PC FOR MEMORY CHECK ENABLE TRAP 
SRTFLG: :.WORD 0 ‘START FLAG 

: O = 200 

F i = 214 
ERRCNT: .WORD 0 + ERROR eG T FOR SWITCH 12 ABORT 
P1.BIT: .WORD O ‘NEXT BIT IN DATA SIMULATION 
PR:BIT: .WORD O :PRESENT BIT_IN DATA SIMULATION 
mi. BIT: “WO 0 : PREV TT IN DATA SIMULATION 
Ne T: :WOR' 0 :BI PREVIOUS BI 
BITCNT: .WORD 0 :BIT ITION 
WRDCNT: .WORD OQ :WORD COUNT FOR NPR TRANSFER 
MEMPAR: .WORD 0 ? MEMORY ENABLE ON FIRST 24K 
BADPAR: :WORD 0 ‘BAD PARITY FLAG 
ECCXOR: .WORD 0 tECC XOR SWITCH 
ECCHI: .WORD O *ECC HIGH STORAGE 
ECCLO: :WORD O :ECC LOW STORAGE 


SEQ 0034 


pir? ys OSKLS dl PRTS 
CZR6EB.P11 O02-DEC-77 10:21 


1743 344 000000 
1744 Ooe346 BORO08 
174S 00235 0000 
1746 O00e 000000 
1747 00e3S4 O00000 - 
1748 00e356 000000 


MACY11 30(1046) 
PROGR 


02-DEC-77 


AM DEFINED VARIABLES 


ECCSRC: .WORD OQ 
ECPATX: .WORD OQ 
ECPOSX: .WORD OQ 
BSEDES: .WORD O 
HIBITS: .WORD OQ 
SAVSWR: .WORD 0 


JO3 


10:43 PAGE 35S 


RN ON ERROR 
ION ON ERROR 
RED 
FOR 18 BIT WORD XFER 
ITCH REGISTER 


SEQ 0035 


CZR6EBO RK611 OSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 36 SEQ 0036 
CZR6EB.P11 O2-DEC-77 10:21 PROGRAM SETUP 


1749 .SBTTL PROGRAM SETUP 

1751 2360 O01 737 000001 002312 PARM: MOV #1,SRTFLG ;LOAD START FLAG FOR PARMETER START 

12 366 rite BR STARTI 

1754 370 012737 177777 002312 RESTRT: MOV #-1,SRTFLG ;LOAD START FLAG FOR RESTART 

1788 376 o0040e BR START1 

1528 oo2400 005037 002312 START: CLR SRTFLG ;CLEAR START FLAG 

1758 002404 oO00005 STARTI: RESET !RESET THE WHOLE SYSTEM 

1759 S0e405 37 001103 CLRB SERFLG “CLEAR ERROR FLAG 

1760 00241 12706 001100 MOV #STACK, SP : INITIALIZE STACK POINTER 

1761 OO02416 012746 000340 MOV #PR7, -(SP) ‘LOAD STACK TO LOCK OUT ALL INTERRUPTS 

1766 002422 016746 002430 nov #1$,-(SP) iL START OF . PROGRAM 

1764 _ —_— — 

1765 002430 004737 035602 1$: ISR PC, a#STKINT - INIT KEYBOARD 

1768 . SBTTL INITIALIZE THE COMMON TAG 

176 ;;CLEAR THE COMMON TAGS (SCMTAG) AREA 

1768 002434 012706 001100 MOV ¥SCMTAG, RE ;;FIRST LOCATION TO BE CLEARED 

1769 gooey OO5026 aaaieall cLR (RE) + » :#CLEAR MEMORY LOCATION 

177 pos 374 — aw BACK IF NO 

1778 0024 Bt 706 001100 MOV #STACK as if THE STACK POINTER 

177 ;; INITIALIZE A FEW VECT 

1774 o024s4 012737 033160 ogog29 nov HSSCOPE  BIOTVEC 57207 VECTOR FOR SCOPE ROUTINE 

1776 Ous475 O17 809030 MOV r} oie c’:; Ma VECTOR FOR ERROR ROUTINE 

173 185 0335 ObOORd Noy #81 vSaTRney + i CEVE VECTOR FOR TRAP CALLS 

1338 Bossie OL 000036 MOV #340 b c+e; LEVEL 7 

1780 i g 64 o00024 nov 1 a v "7 6 POHER, FAILURE VECTOR 

toes osess 15737 besi4e b29139 MOV BNO ABARURVER*S 1 FCEVEL Zio oF -PROGRAN COUNTER 

vei Giese ies ch ES, ENEEAHHEY IUSBE Ot no none ss 

1oBe pose 0 bt 533 PSeO Oot ioe HOV” 2° RAGA i ryaat IZE T LOOP FBRESS FOR SCOPE 
te ee 

1767 Bossee O15737 Oosses BOliiG al oe > PERF os iiSetur R Oop" ADORESS 

1789 :tEQUAL TO A “-1", SETUP FOR A GaP THRRE SWITCH REGISTER. 

1790 002574 013746 MOV BERRVEC,-(SP) ;;SAVE 

1791 g92600 o1e737 26 0 MOV #64S,a#ERRVEC 3; ERROR 

1792 606 012737 177570 001140 MOV #OSWR, SIR ::SETUP F WARE SWICH REGISTER 

1793 002614 012737 177570 001142 MOV #DDISP, DISPLAY ;; A HAROWARE ISPLAY REGISTER 

1794 O0e622 022777 177777 176310 CMP #-1,aSWR *: TRY TO REFERENCE HARDWARE SWR 

1795 002630 001012 BNE 665 j }BRANCH F NO TIMEOUT TRAP OCCURRED 

1797 32 BR 6SS ?:BRANCH IF NO TIMEOUT = 

1798 eb34 12716 o02642 64S: Mov #655, (SP) $:SET UP FOR TRAP RETURN 

1800 42 012737 000176 001140 65S: MOV aSWREG, SWR ;;POINT TO SOFTWARE SWR 

1801 6 012737 000174 O01142 MOV #DISPREG, DISPLAY 

160e 002656 012637 O00004 66S: MOV (SP)+,a"ERRVEC ;;RESTORE ERROR VECTOR 

1804 002662 005037 001256 CLR SPASS ;;CLEAR PASS COUNT 
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a 


Bose | 


bn ae be be ba ae Be be Be 
DONO CWO 


ea aR EEE RE Re eet a ty Ry a 


so 


rorurure 
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Oe te ee a ae be Be ee ae ne pe ae ae be be bn ee ae be be ee me ae ane ae ae ee ene ee ee ee nn be ne ee ee be be ee ee ae 
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5 
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887453 


012737 
005037 


000427 
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000200 
001272 
002314 


177777 
023276 
002774 
oooo4e 
001270 
001140 


ooo001 


177777 


041004 
000001 


040672 
001324 


040724 


001321 


MACY11 ss 


001271 
001140 


oooo04e 


000001 
000176 


001134 


002312 


o00i202 
001324 


001202 


001320 
001320 


1046) O2-DEC-77 10:43 PAGE 37 
NITIALIZE THE COMMON TAGS 
TB BAPTSIZE,SENVM ;;TEST USER SIZE UNDER APT 
Bea — tEYES use NON-ABT SWITCH 
_ MOV SSSWREG, SWR NO, USE apy SWITCH REGISTER 
CLR pROBREGNT nen ERROR COUNT FOR SWITCH 12 ABORT 
.SBTTL TYPE PR M NAME 
;; TYPE THE NAME OF THE PROGRAM IF FIRST PASS 
NC ;;FIRS Ban TPH 
68 i 
" ee : BCTed il 
SBTTL f fe eas SOF TWARE sine Belg Erin 
ist “a4 oo 77 ARE RE AONA ING UNDER XXDP/ACT? 
CMPB SERV, Bt TARE WE RUNNING UNDER APT? 
BEQ ; | BRANCH i? 
CMP SUR, #SHREG 5 7 SOF THA “Sk CH REG SELECTED? 
BNE 1$ He 
GTSWR ae + :GET COE T CSUR SETTINGS 
708: MOVB #1, SAUTOB ;;SET AUTO-MODE INDICATOR 
BR 68S OVER THE ASCIZ 
iiss: -ASCIZ <CRLF>/RK611 orskiees DIAGNOSTIC: PART S CZRG6EBO/<CRLF> 
N #-1 TEST IE, pass 0 
4 tN 
YPE OPROOG : TYPE Bags TIME MESSAGE 
4S: CMP A SRTFLG :CHECK IF PARAMETER START 
BNE $ ;NO, eCONTINUE SE UR 
_ move gence (SP) we S ae ae 
TYPOC ; 1B g S0R26 OR TYPROUT DIGITS) 
TYPE , OPROD2 
RDOCT ;GET VALUE 
MOV (SP)+, STMPO 
BEQ ;CHECK IF <CR> 
CHP #160000, STMPO *CHECK IF IN 1/0 PAGE 
MOV STMPO, SBASE ;LOAD NEW BUS ADDRESS 
7$: TYPE oPROO3 :TYPE “RK611 VECTOR ADDRESS ( ) =" 
MOV $VECT1,-(SP) :TYPE OUT VECTOR ADDRESS 
BIC #160000, (SP) 
TYPE *OPR 
RDOCT ;GET VALUE 
MOV (SP)+, STMPO 
BEQ ;CHECK IF <CR> 
CHP s 000, STMPO :CHECK IF LEGAL 
BIC #17777,SVECT1 ;LOAD NEW VECTOR ADDRESS 
BIS STMPO, $VECT1 
10S: TYPE  OPROO4 ;TYPE "RK611 PRIORITY ( ) =" 
CLR +(SP) 
MOVB SVECT1+1, (SP) 
ASR (SP) ;SHIFT S BITS RIGHT 


SEQ 0037 


SSREEEOATNS GBGSCTR ERIE "ACVI1 SOLHOYR) FSR CGP hueA Sls roe iste se0 onze 


1861 003230 o06216 ASR (SP) 
1 32 16 ASR (SP) 
1 b 1 BSR (SP) | 
1864 ASR (5P) 
1865 TYPOC 
1866 OO3e42 1 1 040724 TYPE , OPROG2 
1867 O44 RDOCT ' 3GET VALUE 
1 001202 HOV (SP) +, STMPO 
1 4 4 BEQ ;CHECK FOR DEFAULT 
18 37 000007 o01202 CMP #7, STMPO :CHECK IF LEGAL 
1871 4 733 BLO 10$ 
187¢ 737 oo00004 001202 CMP #4, STMPO 
187 1347 BHI 10% 
1874 001202 ASL STMPO ;SHIFT S BITS LEFT 
1 pO ASL THe O , 
i ae ASL ™ 
1 1 DO1 ASL TMPO 
lag 335 337 Chev 0 Bre STLOD VECT STORE NEW PRIORITY 
igee beasas Gitate Sabaes Bice nee Meera | 

4 15S: Vv VECTL RKVE ;STORE RK611 VECTOR 
1882 003344 042737 160000 002304 BIC #1600 RKVEC 
1883 90 113737 001321 002306 MOVB SVECTI+1,RKPRI ;STORE PRIORITY 
1884 we 4737 O326S2 JSR PC, $SIZE :SIZE MEMORY 
186 003364 3 D01 NEWPAS: MOV SBASE , R2 ;SET RK POINTER 
1 003370 3 00 135e CLR SESCAPE : CLEAR APE 
1888 003374 737 32516 JSR PC. PARCHK :CHECK OF MEMORY CHECK ENABLE 
1889 2746 o00000 MOV #PRO,-(SP) jLOCK OUT INTERRUPT 
1890 003404 012746 34 MOV #TST1,-(SP) 
1891 003410 o0d0002 RTI 


ceneeeo RK611 OSKLS CTRL PRTS MACY11 SOC ION) O02-DEC-77_ 10:43 PAGE 39 SEQ 0039 


R&EB.P 02-DEC-77 10:21 *xMULTI-SECTOR WRITE OPERATIONS 

1898 .SBTTL #**MULTI-SECTOR WRITE OPERATIONS 

1894 ; jyecguseneeneene tata wah tT 

1835 ; ATE MULTI-SECTOR WRITE (PART 1) 

1897 3 CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. 

1898 1% PUT T CONTROLLER IN DIAGNOSTIC MODE. ISSUE A WRITE 

1899 1 DATA 401 TO AN RKO& IN 26 SECTOR FORMAT s 

1900 + % CYLINDER O CTOR 0. CLOCK THROUGH SEEK 

1901 $i ND DRIVE CLEAR MESSAGES. SIMULATE A SECTOR PULSE 

1902 1a AND ADER. CLOCK THROUGH 400 WORDS AND THE 

1903 1 TWO ECC WORDS. SURE THE NEXT HEADER RECOGNITION 

1904 1 i CYCLE STARTS AND THE PROPER HEADER IS SEARCHED FOR. 

1305 i PROVIDE 6 SECOND GOOD HEADER AND CHECK RECOGNITION 

307 : 

1308 903412 ooo004 Or eam °° elaatpcaanaaimtass amaaeattedepeammamaaatapen a it 
L . 

1316 003414 Ole737 ooo01e 001234 MOV #10. ,STIMES ;;D0 10. ITERATIONS 

igie 003422 o12762 100000 oD0000 MOV #CCLR,RKCS1(R2) ;CLR CONTROLLER 

1914 003430 005037 oO02352 CLR BSEDES ;CLEAR BAD SEC DESIRED 

1915 003424 opens pOSsiE ISR R4, DSECTR *SIMULATE SECTOR PULSE TO SET 

135 ‘ECCW IN RKMR1 FROM INIT POWER UP 

1318 903440 go4H37 032230 JSR R4, LOADRK ioe? oe REGISTERS 

1920 446 000 “BYTE 0 yhd 

1921 003447 000 0 + PRACK 0” 

tase Benes (97579 air bro Colnago 

1ge4 003454 d00023 wWRDATA ?COMMAND WRDATA 

1926 OO34S& 004437 032014 JSR R4, BLDDAT ;GO BUILD DATA 

13e7 003462 000001 1 :PATTERN 1 

1928 003464 004437 032274 JSR R4, OPSTRT ;START THE OPERATION 

tess QORi79 Opuag 882% $Blog S1OTSEEK —_RUTMATEotreng®? SEEM 

1933 003476 104005 ERROR 5 MRI 

1934 003500 104006 ERROR 6 MRE ° 

1335 003502 104007 ERROR 7 :MR3 ” 

1937 003504 004437 023316 JSR R4, DSECTR ;SIMULATE SECTOR PULSE 

igus BRE faust 929740 $8fon YrORSNC FE RIIMERTEHFEDER Eegre® 

134k 003516 104011 ERROR 11 :CS1 CONTEN RROR 

igus QRSERD PRIGRZ OeNe7s $Bfon TOMO RAIMA HOOHN See” 

1945 003526 104013 ERROR 13 :CS1 IN ERROR AFTER SEARCH 

ise 003530 104014 ERROR 14 :RKDCYL OR RKDA IN ERROR AFTER SEARCH 
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MACY11 30(104%6) O2-DEC-77 10:4 ’ 004 
39 MULTI-SECTOR Dette CPA CPaaT i) _ . 
001510 MOV #EMSO2O, EMW ;SET MESSAGE FOR WRITE FAILURE 
JSR R4, DWGPSN ; SIMULATE AND SYNC FOR WRITE 
ERROR 15’ :MR1 IN E IN READ GAP 
RROR 16 :CS1 IN AFTER 
RROR 1 ?MR1 IN ERROR IN WRITING SYNC 
ERROR 20 :CS1 IN ERROR AFTER WRITING SYNC 
001510 mov #EMSOe1 , EMM SET MESSAGE FOR WRITE FA LURE 
ERROR 3, OUR ARI IN ERNOR FN ORETING Fa OR ECC 
ERROR eh :ECC IN ERROR WHILE WRITING DATA 
ERROR 2 :CS1 IN ERROR AF WRITING DATA AND ECC 
MOV #7#4, RO ISSUE CLOCKS TO NeXT HDR COMPARE 
oo0026 1S: MOV #OMO!MCLK, RKMRI (RE) sCLOCK L 
000026 MOV #DMD, RKMRI (Re) 
DEC RO 
BNE i$ 
MOV DCYL,R3 GE SIRED CYLINDER 
JSR Ra, FseCvV HTRVERT Ho LORD 
MOV :STORE EXPECTED MR2 
MOVB « ;GET apesi  TRACK/SECTOR 
BIC COTS as iC 
MOV #5. RO ; "Coun 88 LI TETING 
S$: ASL R3 iFt onngck FOR HEADER ALIGNMENT 
BNE S$ PEEP ONT Me ZERO 
BISB L.0S,R3 INSER CTOR NUMBER 
002260 BIT #CFMT,L.CS1 :TEST IF 18 BIT MODE 
- BIS #B81T9,Ru 'SET “FORMAT BIT FOR WORD TWO 
; JSR RY, FSBLVV INVERT WORD 
MOV 3°E. MRS +e EXPECTED MR3 
o02206 MOV RKMR2(R2),T.MRe ; ‘ace Fi 
002210 MOV MR3(Re);T.MRS GET ae 
002160 MOV RKCS1(Re)’T.CS1 :CET csi 
002220 MOV L.CS1,E.CS1 ;GET EX cTED CS1 
002220 CMP T.C51,£.CS51 *CHECK IF O 
BEQ 3$ ?YES - SK Ip 
ERROR 25 :CS1 IN ERROR _AT MULTI-SECTOR TIME 
BR TST2 +;GO0 TC NEXT TEST 
002246 3s: CMP T.MR2,E.MR2 ;CHECK IF MR2 OK 
BEQ 2s YES - SK 
ERROR 23 iM N ERROR AT MULTI-SECTOR TIME 
BR TST2 ;GO TO NEXT TEST 
002250 2s: cp T,NR3,E MR3 s CHECK IF MR3 OK 
ERROR 24 MR IN ERROR AT MULTI-SECTOR TIME 
BR TST2 +;GO TO NEXT TEST 
4S: ISR R4, DSECTR ;SIMULATE 2ND SECTOR PULSE 


ZR6EB.P 
$82 ocr 
ae Sh 
sie Bass 
3013 004026 
ai 
f 
si 
ss 
2026 


Hetots} 
= 


syegegrnununy 
encrity 
ree: 
s 


e044 070 
204S 074 
Eni, oo7e 
2049 004102 
ecso O041 
es Bit 
11 
e 004114 
Spee 004116 
2087 0M122 
e058 4126 
2e0S9 004130 


Set ll — OSKLS CTRL PRTS 
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104014 


b12737 


012762 
00S037 


023740 


024276 


ooo0i2 001234 
100000 000000 
002352 
032230 


032014 


032274 
023334 


023316 
023740 
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MACY11 = rey es 10:43 PAGE 


41 
MULTI-SECTOR WRITE (PART 1) 


JSR R4, DRSYNC ;SIMULATE PREAMBLE 
ERROR 10 ;MR1 ERROR 
ERROR 11 :CS1 ERROR 
ISR R4, DHOCMP ;SIMULATE HEADER SEARCH 
RROR 1 RROR 
RROR 1 icS1 RROR 
ERROR 14 :RKDCYL OR RKDA IN ERROR 
et 66. 6 MmeLclatn a a. 
; ATEST 2 MULTI-SECTOR WRITE (PART 2) 
1a CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR 
2 ota Es Seo es trol Foner 
iH 0, SECTOR K “THROUGH Seek 
;* TOR Bho 
2 aR Ee BRECON 
ie Prov yee *LECONB i eres ee SCRE TION 
4 
.# 
} - SESSKSREERERERERERERSERERRRRRERARHRERRAEERRRERERERRRRRRRRRKRHRKEKRE 
+éT2: SCOPE 


#10.,STIMES ;;00 10. ITERATIONS 
MOV #CCLR,RKCSI1(R2) ;CLEAR CONTROLLER 


CLR BSEDES ;CLEAR BAD SEC DESIRED 
JSR R4, LOADRK ;LOAD “L” REGISTERS 

0 ;CYL RO 

- BYTE 23 ; SEC 23 

.BYTE 0 ; TRACK O 

OBUFF : BUFFER Count =i OBUFF 
-401 : 

WRDATA sC 

JSR R4, BLODAT ;GO_ BUILD DATA 

2 } PATTERN 2 

JSR RY, OPSTRT ;START THE OPERATION 
JSR RY, DISEEK ; SIMULATE IMPLIED SEEK 
ERROR 4 iCS1 MISCOMPARE 

ERROR 5 

ERROR 6 i MR2 od 

ERROR 7 :MR3 7 

JSR R4,DSECTR ;SIMULATE SECTOR PULSE 
JSR RY, DRSYNC ‘5 MULAT ADER PRE RROLE 
ERROR 10 MR1 CONTENTS IN ERRO 
ERROR ll 'CS1 CONTENTS IN ERROR 


CZR6EBO RK611 DSKLS CTRL PRTS MACY11 30(1046) O2@-DEC-77 10:43 PAGE 42 SEQ O04e2 


CZR6EB.P11 O02-DEC-77 10:21 Te MULTI-SECTOR WRITE (PART 2) 
SEES gauss Opusae cewe7e Hla T:OO% SIME ISIE Base 
184813 ERROR 4 ieehoth BR aKDA Hs — AFTER SEARCH 


Basis? Bn 37 943493 001510 8 as"Bneren™ Sit UATE Gre Br Bho Meine EGR hire : 
Bais ERE ae fa! ERS EOE A. 


a en ac em a aL 
ie is : Hh ERROR AOE" LADY 8 


:CS1 IN ERROR AFTER WRITING DATA AND ECC 


Bousis Bisees 3d ooo026 1s: Mov BRO! RCL rane ches a: 


004220 Ole762 OCO004O o000026 MOV SDM, RK MRI 


Boves6 601370 Bnei 


Petit 
Zon 


002274 MOV L.OCYL,R3 :GET DESIRED CYLINDER 
36 Bowa7 32444 JSR RY, FSBLVV INVERT WORD 
2 010337 246 MOV R3°E.MRe STORE EXPECT! 


; SHIFT on FOR HEADER ALIGNMENT 


a ae 002266 i fe P’ps »R3 iU60P ONT EPO ce 


oo4e74 032737 010000 002260 BIT eCFMT,L.CS1 ; TEST IF 18 BIT MODE 


: ! T 5 oe OKs TOR 
see feral Bese BE ino SA OEE 


Dw 
OW 


SaGANSERSEESRUTSR SRS GO 


Oo308 60335 001000 ve Bes $3179,R3 NO, “FBRMAT BIT FOR WORD TWO 

310) Bo4gi B1g337 Boseso ath Fae AR 3, ates EXPECTED MR3 

1 1 MOV RKMRe(R2),T.MRe ; 
2103 004326 piesa 900036 ast rf MoV RKNRG CR ), 7. MRS ; 
5182 Bed sae 18533 BRSSP8 008260 MOV Peat BE tal” T | Eehecreo cSl 
2108 004350 023737 002160 CMP T.CS1,E.CS1 sac oF UF OK 
5108 Bo4366 1oades PRROR 25 C3} N ERROR AT MULTI-SECTOR TIME 
e109 004 00042 BR TST3 ;GO TO NEXT TEST 
2111 004364 923737 002206 o0224% 3S: CMP T.MR2,E.MR2 CHECK If, MR2 OK 
2lle 004372 BEQ 2s 
gii3 04 oa 104025 oS ERROR 235 ine IN "ERROR QT MULTI- SECTOR TIME 
2115 


SS eee ee oe oe 


CZR6EBO RK611 OSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 43 SEQ 0043 
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116 004400 023737 002210 o02250 2s: CMP T.MR3,E.MR3 ;CHECK IF MR OK 
11? OO440§ 001402 BEQ ug YES - SKIP 
118 004410 104024 ERROR <4 ine N ERROR AT MULTI-SECTOR TIME 
118 GoWie OooNi3 BR tsT3 O NEXT TEST 
181 OO¥414 04437 023316 us: JSR R4, DSECTR SIMALATE 2ND SECTOR PULSE 
123 004420 004437 023740 JSR R4, DRSYNC ; SIMULATE PREAMBLE 
124 904454 104010 ERROR 10 'MR1 ERROR 
004426 104011 ERROR 11 CS1 ERROR 
004430 004437 024276 JSR RY, DHDCMP ;SINULATE HEADER SEARCH 
004434 104012 ERROR 12 
004436 104013 ERROR 13 'CS1 ERROR 
004440 104014 ERROR 14 'RKDCYL OR RKDA IN ERROR 


itEST 3, MID-TRANSFER SEEK (PART 1) 


ZR 
211 
5iie 
att 
5130 
g 21 
ce 
g 23 
os 
gies 
51? 
5156 
el 
3150 
2131 
2132 ; 
6133 jr -TRANSFER SEEK (PART 1) 
2135 * i LEAR RK611 WITH A CONT L Re CLEAR. 
2136 + PUT THE GON TROLLER ND R OYBGNOST IC SPORE, ores 
5136 i ROL TNDER AD eC TOR 2b SECTOR 
51 to Sota pes nPisREEI™ SFr SNPS EI oat 
sit + e RT ROLLER Riss ES 
el4e :# aN oP OES SEEK Ke) er 3 16 fenD BND CY 
gi43 # SURE THE NEXT HEADER RECOGNITION RbeEE DS PROPERLY. 
214s Ls elicbesinens 2th ames tree ait: 
2146 oo444e oD0004 t$T3: SCOPE 
gluz OO4444 012737 oOo001e 001234 MOV #10. ,STIMES ;;D0 10. ITERATIONS 
gia3 oo44S2 012762 100000 ocoDD000 MOV - #CCLR,RKCS1(R2) ;CLEAR CONTROLLER 
e151 CO4460 005037 o023S2 CLR BSEDES ;CLEAR BAD SEC DESIRED 
2153 004464 004437 032230 JSR R4, LOADRK ;LOAD “L” REGISTERS 
2154 004470 oO00000 0 CYLINDER 0 
2155 004472 025 -BYTE 25 ;SECTOR 2S 
e156 473 000 ‘BYTE O : TRACK O 
215 474 047636 OBUFF ‘BUFFER ADDRESS OBUFF 
2158 oo44 177377 -401 ;WORD COUNT -401 
g153 o004s00 000023 WRDATA ‘COMMAND WRDATA 
2161 oo4soe 904437 gzec14 ISR R4, BLDDAT ;GO BUILD DATA 
gibe 004506 000003.-- 3 : :PATTERN 3 
giba eather 032274 ISR R4, OPSTRT ;START THE OPERATION 
e166. 514 004437 023334 ISR R4, DISEEK ; SIMULATE IMPLIED SEEK 
Plo 4520 104004 ERROR 4 CSI MISCOMPARE 
2168 OO4Se2e 10400S ERROR 5S MRI 
2169 004524 104006 ERROR 6 i MRe “ 
2170 004526 104007 ERROR 7 :MR3 “ 


FO4 


CZR6EBO RK61i OSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 44 SEQ 0044 
CZR6EB.P11 02-DEC-77 10:21 T3 MID-TRANSFER SEEK (PART 1) 

317 004530 004437 023316 ISR RY, DSECTR ;SIMULATE SECTOR PULSE 
2174 004534 7 023740 JSR R4, DRSYNC + SIMULATE HE 
2175 gO¥s4O 194010 ERROR 10 os TS IN RN ERROR 
e176 S42 104011 ERROR 11 esi CONTEN 
¢178 S44 004437 024276 ISR RY, GHOCMP ; SIMULATE R SE 
gi 5 104012 ERROR 12 :MR1 ONTENTS R ERROR 

180 5 104013 ERROR 13 :CS1 TER 
e181 654 104014 ERROR 14 i GeBCYL ERrOR RKDA IN ERROR AFTER SEARCH 
2183 S& 012737 043403 001510 MOV sEMSO2O, EMW ;SET MES FOR WRITE FA LURE ‘ 
e184 4 437 025204 ISR R4 , DWGPSN : STMUL nan AND SYNC F ITE 

18S 104015 ERROR 15 :MR1 IN IN READ GAP 
e186 5? 1 O18 ERROR 1 ?CS1 IN ERROR AFTER READ GAP 

1 74 10401 ERROR 1 :MR1 IN ERROR IN WRITING SYNC 
e188 004576 ERROR 20 :CS1 IN ERROR AFTER WRITING SYNC 
2190 00 012737 O43462 001510 MOV #EMSO21 , EMW :SET ME FOR WRITE FAILURE 
2191 matte pAaa? 025604 JSR R4, DWRITE SSF MULATE RITE DATA AND ECC 
2192 OO4%6le 10401 ERROR 17 :MR1 IN ERROR IN WRITING DATA OR ECC 
2193 004614 104021 ERROR 21 :ECC IN ERROR’ WHILE WRT TING DA 
e134 004616 104 ERROR 22 :CS1 IN ERROR AFTER WRITING DATA AND ECC P 
21968 OO%620 012700 000324 MOV #S3.* ;ISSUE CLOCKS TO NEXT HDR COMPARE 
2197 Ooubes Ole762 OOO44O OD0026 1S: MOV SBS EN RKMR1(R2) :CLOCK LOOP 
2198 6 Ole 000040 000026 MOV #DMD, RKMRI (R2) 
= OO4es 905 DEC RO 
e200 4 i BNE i$ 
2e) 4y 274 MOV L.OCYL,R3 ;GET DESI CYLINDER 
a feel Rae fees a ee 
2205 tig 03 002267 MOVB R3 ; GE ore Ee RED. TO eRe SECTOR 
cee fens Sie7e8 booase By HO ARE Leon 
22 74 S$: ASL Ra seen ie oF HEADER ALIGNMENT 
of aoe He Rm 2 (Bie Pare 
geli 7 1 002266 BISB L.0S,R3 ? INSER T NUMBER 
gels ogu778 1482 010000 002260 BIT SCFNT,L.CS1 REST IF IF 38 BIT MODE 
gels oig 0527 001000 - BIS #B1T9,R3 :SET FORMAT BIT FOR WORD TWO 
55i$ 7e2 004437 O32444 : JSR RY, FSBLVV ; INVERT WORD 
ee18 7 10337 250 MOV a3 MR3 :STORE EXPECTED MR3 
2el 7 16237 34 002206 MOV RKMR2(Re),T.MRe ;GET MRe 
2220 74 16237 000036 O022i0 MOV RKMR3(R2);T.MR3 ;GET MRO 
2221 746 016237 002160 MOV CS1(Re):T.CS1 GET CS1 
2222 754 013737 O02260 002220 MOV L.CS1,£.C$1 :GET EXPECTED CS1 
2223 7 023732 002220 CMP T.C51°E.CS1 :CHECK IF OK 
22°4 7 1402 BEQ 3$ :YES - SKIP 
2225 00 104025 ERROR 25 :CS1_ IN ERROR AT MULTI-SECTOR TIME 
gece 004774 o00427 TST4 :;G0 TO NEXT TEST 

| 


C BEBO. 
C2R Pil 


6EB. 
e228 004776 


3638 005010 


Bake coat i 


GO4 


MACY11 —— ni6-PRSN -77_ 10:43 PAG 


4S 
1} SEQ 004S 


;CHECK IF MR2 OK 
iMR2 IN ERROR AT {MULTI-SECTOR TIME 
:;GO TO NEXT TEST 
;CHECK IF MR3 OK 


s¥ P 
Xe IN ERROR _AT MULTI-SECTOR TIME 
;;GO TO NEXT TEST 


;SIMULATE 2@ND SECTOR PULSE 
;SIMULATE PREAMBLE 

;MR1 ERROR 

;CS1 ERROR 

;SIMULATE HEADER SEARCH 
;MR1 ERROR 


;CS1_ ERROR 
;RKDCYL OR RKDA IN ERROR 


jposeuanmenneneacsnppenerssteosesesssqesqanenssnsaensenncnsnenen 
T4 MID-TRANSFER SEEK (PART 2) 


PUT THE CONTROLLER IN DIAGNOS wate R ODE," ISSUE i 
hin’ Bee Pee nb scBasl™ Sh ” Bore eh are 
Basia Ture LU SORIMOURER, pau 


T HEADER RECOGNITION PROCEEDS PROPERLY. 


2 36 36 36-36-36 06 HE AE AE SE AE SE SE aE 8 0 A 0 a 0 0 0 a a 
: § 


0e- 77 10:2 ANSFER SEEK (PAR 
Oe iae oo22e06 O02e4%6 35: ci i 
1 40 ERROR 23 
oo04el1 BR TST4 
023737 O02210 OO02eS0 2S: CMP T.MR3,E.MR3 
ORL ngs . BEQ OF 
1 ERROR 24 
000413 BR TST4Y 
004437 023316 4S: JSR R4,DSECTR 
004437 023740 JSR R4Y, DRSYNC 
104010 ERROR 10 
104011 ERROR ll 
004437 024276 JSR R4Y, DHDCMP 
10401e ERROR l2 
104013 ERROR 13 
104014 ERROR 14 
iT 
;* 
Bd 
ie 
;* 
;* 
;* 
;% 
5 
;* 
* 
hig 
12737 o00012 001234 MOV #10.,STIMES 
Ol2e76e 100000 o00000 MOV #CCLR, RKCS1(R2) 
005037 002352 CLR BSEDES 
enn TA 032230 SR RY, LOADRK 
- BYTE es 
O47b36 OBUFE : 
139839 -401 
000023 WRDATA 
004437 032014 JSR R4, BLODAT 
000004 uy 
004437 032274 JSR R4, OPSTRT 
004437 vVJ23334 JSR RY, DISEEK 


;;D0 10. ITERATIONS 


;CLEAR CONTROLLER 


;CLEAR BAD SEC DESIRED 


icy CINoeRO REGISTERS 
CTOR Bs" 


RACK 4 
Auer ae OBUFF 
COMMAND WROATA- 


560 BUILD DATA 
;PATTERN 4 


;START THE OPERATION 
;SIMULATE IMPLIED SEEK 


| 


CZR6EBO RK611 OSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 46 SES 0046 
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eps gosize jpuony gaRoR G5} MscoMPane 
2206 0513 10400 ERrOR me 
Ba 005142 004437 023316 JSR R4, DSECTR ;SIMULATE SECTOR PULSE 
2e91 005146 004437 023740 JSR RY, DRSYNC imal CONT Nts Th PREAIOLE 
seas BBsies (BG garon {9 inaT COMENTe JN BRege 
D0S1 437 024276 RY, DHDCMP 3s AT H 
sea Boies TOtoie pron ig HART Cor feRFETN BERGE 
Ssae 00S166 104014 ERROR 14 ;RKDCYL OR RKDA IN ERROR AFTER SEARCH 
2300 005170 012737 O843403 OO01S10 MOV Ra BHGPSn ;SET MESSAGE FOR WRITE FAILURE 


AMT ease Pama eee MITE 


;CS1 IN ERROR AF 


Sb Beles asic Gases Foe 
204 104016 ERROR 


16 
104017 RROR 7 :MR1 IN ER N WRIT SYNC 
2305 poestB 1Bub20 ERROR 34 :CS1 ih ERROR AP ER NS he SYNC 
2307 OOS212 012737 oO43462 001510 MOV #EMSO21, EMW ;SET MESSAGE OR WRITE FAILURE 
g 437 025604 JSR R4, DWRITE SI RIT DATA ECC 
104017 ERROR 17 : te i RR N WRITI A OR ECC 
2310 52 104021 ERROR 21 tECC IN ERROR WHILE WRITING DATA 
gait 005230 104022 ERROR 22 :CS1 IN ERROR AFTER WRITING DATA AND ECC 
2313 005232 012700 000324 MOV #53. #4,RO ;ISSUE CLOCKS TO NEXT HDR COMPARE 
2314 36 0127 goo4s pog026 1S: MOV r Di neck RKMR1(R2) :CLOCK LOOP 
g ig ? po0040 o000e6 nov 8 MD, RKMRI (Re) 
e317 005254 1370 BNE 1S 
D0S25E 74 MOV .DCYL,R -GET DESIRED CYLINDER 
5306 bs ebe 4 pasa ek BaP ES be OY iffy RE HO 
S355 ODESTS Listas Onoeee EE ee FA REE TRED TRACK SECTOR 
2323 042703 177400 BIC #177400,R3 :CLE BHGSED BITS 
7 oo00005 MOV #5, RO :SET COUNT FOR SHIFTING 
SS: ASL R ‘SHIFT TRACK FOR HEADER ALIGNMENT 
5359 pussi2 ObLa7s BRE eS OEE UNTIL ZERO 
e3e8 005314 153703 o02266 BISB L.DS,R3 : INSERT eee oR NUMBER 
2330 005320 032737 010000 od2260 IT #CFMT,L.CS1 ;TEST IF 18 BIT MODE 
2331 005326 001402 Bea ‘ :NO = 
5335 me 052703 001000 a BIS #B1T9,R3 ‘SET FORMAT BIT FOR WORD TWO 
é 437 O32444 : JSR R4, FSBLVV ; INVERT WORD 
2335 005 10337 002250 MOV E.MR3 :STORE EXPECTED MR3 
8336 poS344 016237 9034 002206 MOV RKMRe(R2),T.MR2 ;GET MRe 
S2 016237 002210 MOV MR3(Re);T.MRS ;GET MRO 
2338 005360 016237 oO00000 O02160 MOV RKCS1(R2)/T.CS1 ;GET CS1 
2339 OOS366 013737 OO2260 O0e2220 MOV L.CS1,£.C$1 :GET EXPECTED CS1 


O4 


O2-DEC-77_ 10:43 PAGE 47 SEQ 0047 


CZREEBO RK611 OSKLS CTRL PRIS 


MACY11 30(1046) 
T4 


C2R6EB.P11 02-DEC-77 10:21 MID-TRANSFER SEEK (PART 2) 
2340 005374 023737 O02160 0702220 CMP T.CS1,E.CS1 ;CHECK IF OK 
2341 O0S4 001402 BEQ 3$ YES - SKIP 
234 9054 104025 ERROR 25 CSI IN ERROR AT MULTI-SECTOR TIME 
ate 000427 BR TSTS +;GO TO NEXT TEST 
34S 410 023737 O02206 O02e4%6 3S: CMP T.MR2,£.MR2 ; CHECK IF pre OK 
eae 416 001402 BEQ 2s :YES - 
234 4 04023 ERROR 23 ims Re IN "ERROR AT {MUL TI- SECTOR TIME 
e348 0054 21 BR TSTS O NEXT TES 
2350 005424 023737 O02210 o02250 2S: CMP T.MR3,E.MR3 ; CHECK IF MR3 OK 
ge] 4 1402 BEQ E IP 
4 104024 ERROR 4 ime IN ERROR AT MULTI-SECTOR TIME 
e353 005436 41 BR TSTS ;GO TO NEXT TEST 
e358 OOS44O 004437 023316 4$: ISR R4,DSECTR Sinan 2ND SECTOR PULSE 
2357 444 4 023740 ISR R4, DRSYNC ; SIMULATE PREAMBLE 
2358 450 104010 ERROR 10 ?MR1 ERROR 
e353 005452 104011 ERROR 11 ;CS1 ERROR 
s3e4 0054S4 024276 ISR R4, DHDCMP ;SIMULATE HEADER SEARCH 
2 4 Toudie ERROR le ;MRi 
5305 o0S46e 104013 ERROR 13 ;CS1 ERROR 
e264 005464 104014 ERROR 14 :RKDCYL OR RKDA IN ERROR 
2366 
2367 53 88 eguqauusnnsnnoneenseeneaceooucsssesstot. tic = 
2368 jt TS MID-TRANSFER SEEK AND 24 SECTOR FORMAT 
2370 : LEAR mB ROLLER W THe A noe, cis 8 CLEAR 
e371 i T CONTR LER IN a ESSUE But WRITE DATA 
2373 : ae in Re THROUGH SE eek 
2374 : VE ee CTOR PUL 
2375 + # 8 b060 HEADE oe fog 18 BIT WORDS 
2376 + THE 32 BIT ERG. CEE eK THAT IMPLIED SEEK IS 
e372 i Teue O NEXT TRACK. CHECK FOR PROPER HEADER RECOGNITION 
2379 a 
2380 MUTT TCT TT TT TT Tt tT te TT ttt ttt ttt ttt titi ttt ett iti i tise r ieee SY 
2381 OOS466 oo0004 +é1s: SCOPE 
ga8¢ 005470 012737 oo0012 001234 MOV #10.,STIMES ;;DO 10. ITERATIONS 
e384 005476 012762 100000 ooD0000 MOV #CCLR,RKCS1(R2) ;CLEAR CONTROLLER 
S3ee S04 5037 002352 CLR BSEDES CLEAR BAD SEC DESIRED 
2387 00581 2700 oo02000 MOV #2000, RO aa A COUNT TO DELAY FOR CLEAR 
e388 poe 14 300 20s: DEC RO 
g 005516 001376 BNE 20$ ;LOOP UNTIL ZERO 
539 005520 437 032230 ISR R4, LOADRK sLOAD “L” REGISTERS 
23 005524 000 0 ‘ :CYLINDER O 
2393 o05526 023 -BYTE 23 :SECTOR 23 
2394 005527 000 ‘BYTE O : TRACK O 
2395 005530 047636 OBUFF :BUFFER ADDRESS OBUFF 


ceneene RK611 OSKLS CTRL PRTS 
C2 Pil 10:21 


R6EB. 


QRRZ 


Ya at at at at a at at at at at a at te tt a oat 


Peery a at at at at 3 
SSBIKRE 


DR Bde Noor Lv ww VON Lore Owe 


Goss 
Bosse 


02-DEC-77 
177377 
0100e3 


437 
7 


899985 


ee 


cee aang 
tu 
we NI 


rururu 


WOWNNN ey 


88 


032014 


032274 
023334 


023316 
023740 


024276 


043403 001510 


0eS204 
001510 


043462 
025604 


ooo026 
000040 O00026 


002266 
010000 002260 


MACY11 30(1046) 
TS 


1$: 


Ss: 


JOY 
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PAGE 4 
MID-TRANSFER SEEK AND 24 gecTOR FORMAT 


-401 
WRDATA! CFMT 
Saat R4, BLDODAT 


JSR R4, GPSTRT 
JSR RY, DISEEK 


ERROR 

ERROR 5 
ERROR 6 
ERROR 7 


JSR R4,DSECTR 
JSR RY, DRSYNC 
10 


ERROR 
ERROR 11 

JSR R4, DHDCMP 
ERROR le 

ERROR 13 

ERROR 14 

MOV #EMSO2O, EMW 
ISR R4, DWGPSN 
ERROR 15 

ERROR 16 

ERROR 17 

ERROR 20 


MOV #eMsoe EMW 
JSR Ra, RItE 


ERROR 1 ECC iH WRIT 
ERROR g} CSi iN RROR ae Tee WETTING DATA AND ECC 

MOV 853 id SUE CLOCKS TO NEXT HDR COMPARE 
MOV SBRO IMEC RKMRI (R2) :CLOCK LOOP 

MOV #DMD, RKMRI CR 

DEC RO 

BNE 1$ 

MOV L.OCYL,R3 ;GET DESIRED CYLINDER 

JSR Ra, FSBCVV j INVERT WORD WORD 

MOVB L.OT.R3 ier best RES FRACK/SECTOR 

BIC #177400,R3 sCLE SED B 

MOV #5,RO SE COUN FOR BL tr TING 

ASL R :SHIFT TRACK FOR HEADER ALIGNMENT 

DEC RO :DEC COUNT 

BNE S$ ;LOOP UNTIL ZERO 

BISB L.0S,R3 tINSERT SECTOR NUMBER 

BIT #CFMT,L.CS1 ;TEST IF 18 BIT MODE 


;WORD COUNT -401 
;COMMAND WROATA!CFMT 


;GO_ BUILD DATA 
;PATTERN 7 


;START THE OPERATION 
;SIMULATE IMPLIED SEEK 
MISCOMPARE 


;CS1 M 
;MR1 
;MR2 z 
;MR3 ” 


;SIMULATE SECTOR PULSE 


jSTMAATS HEADER PREAMBLE 
;MR1 CONTENTS IN ERROR 
;CS1 CONTENTS IN ERROR 


; SIMULA Te He HEADER SEARCH 

jAIRL 0 CONTE ENTS IN ER ERROR 

; bow BARK RKDA IN RERROR 
T 


SEQ 0048 





CZR6EBO RK611 OSKLS CTRL PRIS 
CZR6EB.P11 O02-DEC-77 


£ 
W 
N 


wn ~-O 


oogoo4 
012737 
005037 
012762 


004437 
000632 


10:21 
001000 
44 
250 
000034 206 
2210 
02160 


O02e06 002246 


002210 O02250 


023316 
023740 


024276 


000012 001234 


002352 
100000 o00000 


032230 


KO4Y 
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MID-TRANSFER SEEK AND 24 SECTOR FORMAT 


BEQ &S ;NO_- SKIP 
- BIS #B1T9,R3 :SET FORMAT BIT FOR WORD TWO 
JSR R4, FSBLVV ; INVERT 
MOV R3,E.MR3 ; STORE EXPECTED MR3 
MOV RKMR2(Re),T.MRe ;GET MRe 
MOV RKMIRS( Re), 1. MRS :GET MR3 
MOV RKCS1(Re).T.CS1 ;GET CS1 
MOV L.CS1,6-CB1 :GET EXPECTED CS1 
CMP 7C51,£.C51 + CHECK OK 
BEQ 3$ 7YES - SKIP 
ERROR 25 :CS1 IN ERROR_AT MULTI-SECTOR TIME 
BR TST6 :;GO TO NEXT TEST 
3S: CMP T.MR2,E.MR2 CHECK IF MR2 OK 
BEQ 2s YES - SKIP 
ERROR 23 :MR2 IN ERROR AT MULTI-SECTOR TIME 
BR TSTb ::GO TO NEXT TEST 
2s: CMP T.MR3,E.MR3 ; CHECK IF MR3 OK 
BEQ 4g YES - SKIP 
ERROR 24 :ne IN ERROR AT MULTI-SECTOR TIME 
BR TST6 ;GO TO NEXT TEST 
4S: ISR R4, DSECTR simaane 2ND SECTOR PULSE 
ISR R4, DRSYNC ;SIMULATE PREAMBLE 
ERROR 10 ?MR1 ERROR 
ERROR 11 ?CS1 ERROR 
ISR R4, DHDCMP ;SIMULATE HEADER SEARCH 
ERROR 12 :MR1 ERROR 
ERROR 1 ;CS1 RROR 
ERROR 14 :RKDCYL OR RKDA IN ERROR 


peesgnquonnsasegneuersstecssseqosesnegeneenenssandananenennnenss 
EST 6 CYLINDER OVERFLOW (PART 1) 


eur THE RKGL1 PTR btBcngs WITH A ASONTROLLER. Cl. CLEAR. 
THE CONT STIC MODE SSUE A WRITE R 
AN RKO& IN 26 SECTOR FORMAT 
ROL ENDER” ree Bo’ SECTOR 2S. CLOCK THROUGH SEEK 
AND DRIVE CLEAR MESSAGES. SIMULATE A SECTOR PULSE 
HEADER. CLOCK THROUGH 400 WORDS AND THE 
THO WORD CC. MAKE SURE CYLINDER OVERFLOW ERROR DOES 


Wee CC CE ie OKC hem = 
par 


_aaae ° _amagaaapaa ae asar maaan cenamuaasiantaiai et tests 
MOV #10.,STIMES ;;00 10. ITERATIONS 


CLR BSEDES ;CLEAR BAD SEC DESIRED 
MOV #CCLR,RKCS1(R2) ;CLEAR CONTROLLER 


JSR R4Y, LOADRK LOAD “L" REGISTERS 
632 i GYL TINDER 632 ‘ 


tST6 


SEQ 0049 


LOY 


CZR6EBO RK611 OSKLS CTRL PRTS SEG 0050 


_C2R 6EB.P1l 





O2-DEC-77 10:21 


ee - 


MACY11 30(1046) O2-DEC-77 10:43 PAGE SO 
T6 CYLINDER OVERFLOW (PART 1) 


140 025 -BYTE 25 ;SECTOR 25 
go 14 oge BYTE 2 + TRACK 2 
goi0 ie 0476 OBUF F ‘ORD Coun ADDRESS OBUFF 
| : 146 baooes WRDATA + AONMAND UNRDATAC 
| 2514 004437 032014 JSR R4, BLODAT 9 BUILD DATA 
seg 006154 000001 1 OO Te 
gol7 006156 004437 032274 ISR R4, OPSTRT ;START THE OPERATION 
es 437 023334 JSR R4, DISEEK :$ MULATE IMPLIED SEEK 
5243 ige Tpude4 ZRROR 4’ fe MISCO APARE 
2521 006170 104005 ERROR 5 
esee 00617¢ 104006 ERROR 6 iM ° 
e523 174 104007 ERROR 7 ;MR3 ° 
g 004437 023316 ISR R4,DSECTR ;SIMULATE SECTOR PULSE 
004437 023740 JSR RY, DRSYNC SIMULATE HEADER PREAMBLE 
104010 ERROR 10 AAT CONTENTS IN RROR 
104011 ERROR 11 3CS1 CONTENTS IN 
37 024276 ISR R4, DHDCMP :S H 
tnnes ERROR 12’ ira "ON Tents (i ERROR 
104013 ERROR 13 RROR AFTER SE 
104014 ERROR 14 Goh iN BR RO KOA IN ERROR COFTER SEARCH 
12737 043403 001510 MOV #EMSO20, EMW ;SET MEDS FOR WRITE FAILURE 
4437 025204 ISR R4, DWGPSN :SIMULATE GAP AND SYNC FOR WRITE 
104015 ERROR 15 :MR1 IN RROR IN RE GAP 
ibyot? ERROR I? iGRi IN ERROR IN WRITING. SYNC 
hatte RROR be *CS1 ih RROR TER wa f ine SYNC 
012737 O43462 001510 MOV #EMSO21, EMW SET MES F WRITE FAILURE 
4437 025604 JSR R4, DWRITE *SIMULATE WRITE DATA ECC 
104017 ERROR 17° :MR1 IN OR WRITING DATA OR ECC 
104021 ERROR 21 :ECC IN ERROR WHILE WRITING DAT 
0402 ERROR 22 :CS1 IN ERROR AFTER WRITING DATA AND ECC 
012700 oo00016 MOV #3*4+2 :SET COUNT TO END OPERATION 
012762 OOO44O oD0026 1S: MOV SOMDIRCC RKMR1(R2) Age t CLOCK 
Ole762 000040 o00026 MOV #D0MD, RKMRI (Re) ;CLEAR CLOCK 
530 DEC RO He COUNT 
001370 BNE Ly LOOP UNTIL O 
p04437 032356 JSR TREG ext RK611 REGISTERS 
2737 100000 002160 BIT act T.CS1 i igST IF ANY ERROR SET 
001415 BEQ NO - SKIP TO EXIT 
2737 001000 002174 i SCOE,T.ER Test IF, IT IS COE 
012737 o44e53 001622 MOV #ESO26A,EHO30 :SET MESSAGE HEADER 
104030 ERROR 30 :"UNEXPECTED COE ERROR” 


MOY 


CZR6EBO RK611 DSKLS CTRL PRTS MACY1I1 30(1046) O2-DEC-77 10:43 PAGE S1 
CZR6EB.P11 02-DEC-77 10:21 Tb CYLINDER OVERFLOW (PART 1) 
g5bu 006346 o00404 BR 3$ ° ;EXIT 
2566 006350 012737 O44253 001632 2S: MOV BESO26A,EHO31  ;SET HEADER 
e567 006356 104031 ERROR 31 ;"UNEXPECTED ERROR TESTING COE” 
gob3 006360 3$: 
2s71 z = REKKKKREREREE KERR RKAEREREREKAKKRARARRRARERERAAARAA RARER RAARAAAKKAE 
gove jr T7 CYLINDER OVERFLOW (PART 2) 
74 1% THE RK’ RW TH A CONT ER CLEAR 
75 i UP THe CONTROLLER IN DIAGNOST i ox! et A WRITE 
ear iE BOTGABER@LAMOHPRDS MUcEOR 4B 8 PEELOPL ABI seex 
2579 1% AND B ries LEAR He SSnces. THROUGH 400 WORDS 
380 i TWO ECC WORDS. MAKE SURE CYLINDER OVERFLOW ERROR SETS. 
2582 H .lalked-+-+-)-+- tlhe lealeialaialiainianiaieiaiaiaialaiaiaiciaiaininininininial 
2583 006360 o00004 SCOPE 
e366 006 012737 oo0012 001234 MOV #10. ,STIMES ;;D0 10. ITERATIONS 
006370 005037 002352 CLR BSEDES ;CLEAR BAD SEC DESIRED 
gee? 006374 012762 100000 oo00000 MOV #CCLR,RKCS1(R2) ;CLEAR CONTROLLER 
2589 006402 004437 032230 JSR R4, LOADRK LOAD “L” REGISTERS 
et Beh es Ty F ee 
30 qt if - BYTE 5 #6 
25 006412 047636 OBUFF ;BUFFER ADDRESS OBUFF 
2594 006414 177377 -401 :WORD COUNT -401 
ses 006416 0o00023 WRDATA ;COMMAND WROATA 
006420 004437 032014 ISR R4, BLDDAT ;GO BUILD DATA 
ge 006424 o000 2 :PATTERN 2 
550i 006426 004437 032274 ISR R4, OPSTRT ;START THE OPERATION 
C2 O064 004437 023334 ISR R4, DISEEK ; SIMULATE IMPLIED SEEK 
2603 6436 104004 ERROR 4 jCS1 MISCOMPARE 
04 440 104005 ERROR 5S MR1 
Os 442 104006 ERROR 6 MRE ° 
Ob 006444 104007 ERROR 7 :MR3 ° 
2608 OO644E 004437 023316 JSR R4, DSECTR ;SIMULATE SECTOR PULSE 
2610 OO064S2 004437 023740 ISR R4, DRSYNC ;SIMULATE HEADER PREAMBLE 
2611 OO64S6 104010 ERROR 10 :MR1 CONTENTS IN ERROR 
eble 006 104011 ERROR 11 ?CS1 CONTENTS IN ERROR 
cele Beewge tpusr7. one7s $Bfog ECMO I RAIM CEN CMON PEGE 
Bat 0064 14015 ERROR § 3C 1 $f ERRO ; ANSER CP ar ARCH 
e617 006472 104014 ERROR 14 i eeocyL OR RKDA IN ERROR AFTER SEARCH 
2619 O06474 012737 043403 001510 MOV #EMSO20, EMW ;SET MESSAGE FOR WRITE FAILURE 


SEQ 0051 


CZR6EBO RK611 
COREEB.P11 
sesh Boers 
1 
5ee3 12 
«SPSS beets 
| SeSe ooesie 
| $ess Bbeets 
906530 
O06 
5630 O0bE34 
5631 
5632 
2 ce 
| BBS Bosse 
2697 BORED 
2639 p0ssbe 
WO O06S66 
zeus OObS74 
5e45 006576 
Seu4 QOBE04 
5e4S OOGE06 
eee 006610 
e4 
5648 006612 
5649 OObE20 
5E50 
5661 006622 
5ee2 
5e55 
5ee4 
Sees 
Seee 
5687 
5668 
5e89 
5660 
5661 
SEES 
5Ee3 
Se64 
SEES 
SEob 
See? 006622 
568 OObE24 
550 006632 
E71 OOLE36 
5e> 
5673 OOG644 
5674 QOGESO 
5675 OOeEE4 
| 
| 
| 


: 
ane 
ip4o1e 
104017 


14020 


012737 
104026 


oooo04 
012737 


005037 
012762 


005037 
005037 
004437 
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025204 


043462 
025604 


000016 


044253 


000012 


002352 
100000 


002344 
02354 
32230 
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001510 


000026 
000026 


002174 


002160 


001602 


001234 


000000 


NOY 


02-DEC-77 10:43 PAGE 
CYLINDER OVERFLOW (PART 2 
ISR R4, DWGPSN 
ERROR 15 
RROR 16 
ERROR 17 
OR 20 
MOV #EMSO21, EMW 
ISR R4, DWRIT 
ERROR 17 
ERROR 21 
ERROR 22 
MOV #3*4+2, RO 
1S: MOV SOMO! MOLK RKMR1 
MOV #DMD, RKMRI (R2) 
DEC RO 
BNE 1$ 
JSR RY GETREG 
BIT ac coe, 
BNE 
BIT senate 
BEQ $ 
ERROR 27 
BR 3$ 
2s: MOV #ESO026A, EHO26 
ERROR 26 


38: 
.SBTTL #*#NPR WRITING OF MEMORY 


Te paaiamaaag OO ar oS ameter tie ecitaie 


j ATE NPR WRITING OF 
S CLEAR RK611 
1 a PU CONTROLL 
+H OF TRDER CB. HEROD, “SEC 
$% Rive os I este 
1a A GOOD HEADE 
i ARE WRITTEN BROPERLY IN 
4 
+éTi0: Sco 
Roy #10. ,STIMES 
CLR BSEDES 
MOV #CCLR, RKCS1(R2) 
CLR ECCSRC 
CLR HIBITS 
ISR R4, LOADRK 


uy 
~f 


OM2uMN OzOzwW 
veaan eaees 
SeebA Zezz5 
23358 

47 


Lone hem 


-SET COUNT TO COMPLETE OPERATION ™~ 
(R2) ;RUN THE CLOCK 


;DEC COUNT 
;LOOP UNTIL O 


;GET_RK611 REGS 
seat IF COE SET 
YES - EXIT TEST 
;TEST IF_ANY OTHER ERROR SET 


if’ SKIP 
NO_COE WHEN EXPECTED” 
tobe TO EXIT 


;SET HEADER 


;"UNEXPECTED ERROR WHEN FORCING COE” 


MEMORY 


Rt RN BEAGNOST TC” MOD a CONTROLLER CLEAR. 


E. ISSUE A READ DATA 
MOP Es OR FORMAT 
CLOCK | THROUGH SEEK 


TOR 0. 
Ss. SIMUL ULATE A SECTOR PULSE 
A WORDS. VERIFY THAT THE WORDS 


© MMM RRR ERR AERRER EERE RREKRRRE RE 


;;00 10. ITERATIONS 


;CLEAR BAD SEC DESIRED 
:CLEAR CONTROLLER 


; CLEAR Ege SOURCE 
;CLEAR HI ORDER BITS 
;LOAD “L” REGISTERS 


SEQ 0052 
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2676 ooo000 


so70 


seeeean rate 


ee 
ae 
a27 
rss 


SSSIFR LG 
: 
= 


Wt ututatatatat 


QRRZERE 
eRe 
g 332 
32 
S ton8 


8 
<= 
£ 
N 


026500 


REE 
2 
saa5 
oul 


NN O 


NNN sqo5000 
SSS OW 


rururofurorororururory 


ooo000 
004066 
027176 


rururorururuoruru 
NNNNNNNN 
ou een Bueew 
DOO NOU Wr 
gegggess 
N NN 
io 
ee io 
reaeeeet as 
oo00000 
oat a1 =Re 
Wr 


700 047636 
701 O4663e 


o0001e 
001236 
001220 
000040 


MACY11 


002346 
002350 


O2-DEC-77 10:43 
NPR WRITING OF MEMOR 


0 
IBUFF 


-400 
RDDATA 





0 
0 


R4Y, CLRIBF 
R4, BLODAT 


R4,DSECTR 
” aaahtas 


— 
-O 


, DHOCMP 


DD 


Owens 
wruouw fwwt 


, ORGPSN 


wre 


#0, ECPATX 
#4066, ECPOSX 
4, DREAD 


sOBUFF ,RO 
#IBUFF,R1 


#10. .R4 
SESCAPE 
STMP7 

#40,R3 


;GO CLEAR INPUT BUFFER 
;GO_ BUILD DATA 
;PATTERN 3 


ART THE OPERATION 
MULATE IMPLIED SEEK 

1 MISCOMPARE 

MR1 a 

;MRe re 

;MR3 ™ 

;SIMULATE SECTOR PULSE 
;SIMULATE HEADER PREAMBLE 


;MR1 CONTENTS IN ERROR 
S1 CONTENTS IN ERROR 


MULAT! ARCH 
OR 


pe AFTER SEARCH 


RKDA IN ERROR AFTER SEARCH 


6 '= 
3 
3 
3 


T 
bine SYNC 
R READING SYNC 


see 
He 
BARR 


MULATE 

i OR ECC 
NG DATA_OR ECC 
ER ECC READ 


;SET POINTER TO GOOD DATA 
;SET POINTER TO INPUT DATA 


; SET ary LIMIT COUNT 
;CLEAR ESCAP 

;CLEAR ERROR REPORT SWITCH 
;SET COMPARE LIMIT 


SEQ 0053 


CZR6EBO RK611 OSKLS CTRL PRTS 


CZR6EB.P11 


fururu! 
re. 
a 
oF 


NNN N 


N 
Begg 88g 
be be be ht be bb be 


: 
: 


eae 
: 
oe BORBE ESB 


g 
& 


ooogo4 
012737 


046632 
177400 


O02-DEC-77 10:21 


MACY11 i! _ nos te 


001234 


ooo000 


1$: 
4$: 


es: 


3$: 


SS: 


CLR RS 
MP "seen 
phe 3 
BEQ S$ 
IN Re 
CM (RO)+, (R1)+ 
ER 1$ 
DEC RY 
BEG S$ 
v (RO), 
Mov CRIBS SREGT 
MOV RS, SREGE 
TST STMP7 
BNE 3$ 
in TMP7 
OR 7 
BR 4§ 
ERROR 40 
4§ 


AGE S4 
Y 


;CLEAR WORD COUNTER 


nee aac ot LIMIT 
eeKIP T EXIT 


ee oun NTERS 

DEC ERROR INIT 

ist B20 Sho. FOR REPORT 
’ 


DECIDE at ERROR REPORT TO USE 


;SKIP IF NO 


EL ee pute STMEZ ERROR LINE 


; SKIP 


;REPORT ALL OTHER LINES 
;SKIP 


-SBTTL ##ECC ERROR DETECTION/CORRECTION TESTS 


téTE 


eT 11: 


spre ee 


of 


Si cE ote 


el ea eee 
READ DATA WITH NO ERROR 


R WITH A 


TIC MODE,» TSSUE A READ DATA 


este ah OR PULSE 


VERIFY THAT COMMAND ae tonDe, WETHOUT soRRO 


MOV 


SEDE 
RA ces (RES 


RK 


reteeeesssususuessnnececneenenneveessononnassssessdssssenoeni 
#1,STIMES 


;;D0 1 ITERATION 


CLEAR BAD SEC DESIRED 
CLEAR CONTROLLER 
‘Stee EEE BOURKE FLAG 
LEAR RCE 
CLEAR HI ORDER BITS 


iL REGISTERS 
;CYL NOER 0 
3 SEC 0 


; TRACK O 
;BUFFER ADDRESS IBUFF 
:WORD COUNT -400 


etc. 


SEQ 00S4 


CZR6EBO RK611 OSKLS dL PRTS 
CZ 10:21 


R6EB.P11 


7 


tu furururu 
Susie & 
Se “8 


sepecnees 


Ree eee 
NOU WT 


SEUSS 


etted tite 
Reow-o 


Fi 
Be 


007210 
007212 


bo78e8 


Oe-DEC-77 


000021 


031770 
032014 


032274 
023334 


023316 
023740 


024276 


026500 


4066 
027176 


MACY11 4 


oo0026 
000026 
002160 


Soeee0 


002220 


( 
1 


1S: 


O02-DE 


RDDATA 
JSR 


-77 10:43 PAGE SS 
READ DATA WITH NO ERROR 


SEQ OOSS 


;COMMAND RDDATA 

R4, CLRIBF ;GO CLEAR INPUT BUFFER 
R4, T : TA 

peuooaT Bar PEEK AO® 

y 
R4, OPSTRT ;START THE OPERATION 
R4; DISEEK eet Rise IMPLIED SEEK 
d 1 MISCOMPAR 
: Nie " 
R4, DSECTR ;SIMULATE SECTOR PULSE 
R4, DRSYNC 
10’ AAT CON NRENTC IN E 
11 :CS1 CONTENTS IN E 
RY, DHDCMP 
12’ A ae ONTEN N on her 
13 sCSI IN yi AFTER SEARCH 
14 ?RKDCYL OR RKDA IN ERROR AFTER SEARCH 
Ru, ORGPSN ;G0 READ A ene a 
1 ite} N B READING GAP 
32 MR N 
33 :CS1 IN RETER R GE AD ING SYNC 
#0, ECPATX ; LOAD part RN 
#4066 , ECPOSX it OAD EXPECT ION 
R4, DREAD ;GO ATE ae ab 

; R To MULATE 

34 ;MR1 IN AD DATA OR ECC 
35 :ECC ADING DATA 
° Sek aerOtucoune fEPtES BEZ*eeR®* 
yB aa IN ede BRE ALC. 
43 :ERR IN ECC POS COUNT 
#40. #37. ,RO ;SET COUNT TO EMPTY SILO 
#0MD! MCLK RKMRI (RE) ;CLOCK CONTROLLER 

#OMD, RKMR 
RO ;DEC_COUNT 
1$ ‘LOOP UNTIL O 
RKCS1(R2), T. CS i GET cs - 
oy .cS1 ;CLE bo 5? 
#ROY,E.CS1 :SET READY BIT 

T.cS1,&.CS1 :CHECK IF CS1 CORRECT 


CZR6EBO RK611 OSKLS CTRL PRTS 
B.Pil 10:21 


C2REEB 02-DEC-77 1 
44 pera 001401 
“gO 104056 

one 
5849 
5850 
sees 
eee 
Sess 
5as6 
Sas? 
5e68 
5g69 
eee 
S862 007430 000004 
2863 007432 012737 000001 
S o07440 ? 
8be Boeuas §«Sistes }=fbaeRn 
see yuse 005037 902354 
7486 004437 032230 
58 000000 
e871 64 000 
7 £5 000 
2873 poise 6632 
5874 007470 177400 
2675 ou7uze 
2877 007474 004437 031770 
2875 907500 904497 032014 
5881 
e882 007506 012700 000530 
584 007512 012737 177446 
2586 18737 015457 
BBs 13737 00000 
588 932760 0001 
2568 42 O01 
5e89 007544 052760 O00100 
5g90 007652 o3 
2631 007564 B43768 ooo100 
Sea3 
2894 007562 004437 032274 
2835 O075E6 OOW437 023334 
S8qo bosesd §=touoe ; 
Seog poses. |= tp4pOE 
2899 007600 104007 


MACY11 30(1046) 
Til 


001234 


090000 


02-DEC-77 10:43 PAGE Sb 
READ DATA WITH NO ERROR 
E sYES - SKIP 
For 4 :"CS1 IN ERROR AFTER READ DATA” 
H Lsucgvegnunnnnnsevsesconosensnoqeser eT ian iar te 
; ATES READ DATA WITH ONE BIT BURST ERROR (PART 1) 
iS CL RW TH. A CONT ER CLEAR 
re PUT CONTROLLER 1 Ror SUE Sue A READ DATA 
:# nit & CT ORMAT 
tH ae Re as’ YERO a T SEEK 
7 S. SIMULATE A SECTOR PULSE 
a TA. AND AN ECC INDICATING 
+ VERIFY one ely NTING OFT i sels 
1a ferlches BND THE FINAL PA Bae TERR: ANS POSITION INFORMATION. 
i MAKE SURE DATA CHECK AND CONTROLLER ERROR SETS 
oT yar“. tpmnaeanmemmmete i etaemmaemecinpacececiniiate 
MOV #1,STIMES ;;D0 1 ITERATION 
CLR BSEDES :CLEAR BAD SEC DESIR 
MOV #CCLR,RKCS1(R2) ;C tERR BAO TROLLER - 
CLR HIBITS CLEAR HI ORDER BITS 
JSR R4, LORDRK OAD “L” REGIST RS 
0 eis © 
BYTE 0O 
“BYTE O 
IBUFF ‘BUFFER O ADDRESS IBUFF 
-400 ORD COUNT -400 
RODATA * COMMAND RODATA 
ISR R4, CLRIBF ;GO CLEAR INPUT BUFFER 
ISF R4, BLDDAT ;G0_ BUILD DATA 
? :PATTERN 7 
MOV #530, RO ;SET INDEX INTO BUFFER 
MOV #177446 OBUFF +1000 ;STORE ECC WORDS 
MOV 15457, OBUFF +1002 
MOV ECCSRC ;SET SOURCE TO INDICATE ECC IN BUFFER 
BIT a1 Ecc OBUFF (RO) iT ST IF BIT SET 
BNE 100$ ves KIP 
BIS #8176, OBUFF (RO) tEL E Set BIT 
1908: BIC 101s OBUFF(RO) ;CLEAR BIT 
ISR R4, OPSTRT ;START THE OPERATION 
JSR RY; DISEEK :SIMULATE IMPLIED SEEK 
ERROR 4 ;CS1 M MISCOMPARE 
ERROR 5 MRI 
ERROR 6 i MR2 “ 
ERROR 7 :MR3 “ 


SEQ O0S6 


CZR6EBO RK611 OSKLS CTRL PRTS MACYI1 30(1046) Oe2-DEC-77 10:43 PAGE 57 SEQ 00S7 
CZR6EB.Pil Oe-DEC-77 10:21 Tle READ DATA WITH ONE BIT BURST ERROR (PART 1) 


6E 
2900 
3304 007602 004437 
BOE Te 10401 
sabe Bose tS 1puoTd 
29307 0761 004437 
e303 Stress ip4o13 
18 Saree 1Gls 
2312 7630 004437 
e313 poze ss 104015 
14 007 104016 
23915 007640 104032 
gals 007642 104033 
2918 007644 012737 
2919 b07b85 012737 
2920 00 004437 
2921 007664 o00400 
eSee 007666 104034 
S354 pnse7e tpuoae 
se tes ine 
Fe 807908 iouo43 
5358 
2930 007702 012737 
2931 007710 012700 
e335 GFr83 SAEs 
2934 
2935 77 7. 
S235 Basss4 pres 
~~) 
2338 00774 016237 
2940 007750 
S42 AC 140 
cs rors tela 
2944 ge373 
exe 100) Touod 
5349 ol boeoa3 
e948 O0100i2 005301 
2349 010014 001343 
2950 10016 300 
2951 0100. 001406 
e9Se 010022 012737 
2953 010030 012701 
2954 010034 000733 


023316 
023740 


024276 


026500 


000001 
004066 
027176 


177777 
020000 


002346 
002350 


002326 


002214 
O00ee12 
O02eeSe 
002214 


002212 


002350 


3S: 


18: 


es: 


JSR R4, DSECTR 


JSR RY, DRSYNC 
ERROR 10 

ERROR 11 

ISR R4, DHDCMP 
ERROR 12 

RROR 13 

RROR 14 

JSR R4, DRGPSN 
ERR 1S 

RROR 16 

ERROR 32 
ERROR 33 

MOV #1, ECPATX 
MOV #4066, ECPOSX 
JSR R4, DREAD 
400 

ERROR 

ERROR 35 
ERROR 36 

ERROR 41 

ERROR 42 

ERROR 43 

MOV #20, BITCNT 
MOV R 


#5,RO 
MOV #13 72,R1 
STMPS 


JSR PC N 
MOV PEERS TS ),T. 
MOV KECPS(Re),T. 
INC ECPOSX 

MOV ECPOSx,£.ECPS 
CMP E.ECPT;T.ECPT 

BEQ 1$ 

ERROR 42 

CMP E.ECPS,T.ECPS 
EQ 2S 

ERROR 43 

INC BITCNT 

DEC R1 

BNE 3$ 

DEC RO 

BEQ 4§ 

MOV #-1, ECPOSX 


MOV #20000,R1 
3$ 


;SIMULATE SECTOR PULSE 

; SIMU.ATS Ns R PREAMBLE 

ted CONTEN N ERROR 

;CS1 CONTENTS N ERROR 

Fe? Vag cl ADER SEARCH 
ONTENT 


i MR S IN ERROR 


1¢ 
2 ey oo or ARCH 
KDCYL N E AFTER SEARCH 


O FRRES BPEL ac cow 


MRI ee ee SYNC 
ics 1 ERROR AFTER NREADING SYNC 
;LOAD EXPECTED PATTERN 
3 LOAD EXPECT. resi ion 

S A_READ 


DOA 


MRI 
ont 


wt” 
222258 


READING DATA OR ECC 
Ecc EG INCORRECT AFTER ECC READ 

iN CC PAT CALC. 
FERR CC POS COUNT 


mmmomszere oO 


;SET BIT count Eon connec s 10M COUNT 
Set COUNT F OR ESSE S PAS 

ET COUNT FOR GcPos TO O FIRST PASS 
LEAR SWITCH 


+ BONERA EEtC 
EcPt pa TTERN 
ECPS 


iGeT P SITION 
jBUMP POSITION OBL DECTED 
:SET FOR COMPARE AND REPORT 
i CHECK Ip ATT ERN CORRECT 


sPeeCK IF POSITION CORRECT 
;YES - SKIP 


;BUMP BIT COUNT 

;DEC COUNT TO ZERO IN ECCPOS 

‘NOT Y¥ YET ZE 

EC PASS THRU “0 COUNT 

HIF QO - SK 

j PRESET EXPECTED Por TO GO TO ZERO 
;SET COUNT TO NEXT O IN ECC POS 
;G0 DO LOOP AGAIN 


402 


TT Ts sss 2 


=e 


NT ey Ee ad ee ee ee 


ON00000000000 
a ay aay aay aa ay any ay any any as 


PLT EREVON ESS 


33 Reeaees 


OONONOOOOOO0000N BO00000 


611 OSKLS CTRL PRIS 
02-bEC=7 


-77 10:21 


00S737 
2 


001404 
012737 
10404S 


004437 


004437 
000007 


001214 
00S276 


17777 


001214 


Bs28e 
4 


0001 
002160 


000100 
100000 


800001 
e3Se 
100000 


032230 


031770 
032014 


MACY11 30(1046) 
Tle 


Bee: a. Cotta SsAceS S A fat PULSE 


Ur. WRC RCC Re RC oe) oe 


GOS 


02-DEC-77 10:43 P S 

RESO BATA WITH ONE BIT BURST ERROR (PART 1) = oe 
le ALREADY SET. -_SKIP 

MOV 32276,R1 :Oef COUN TO FINAL POSITION 

MOV #1 RO iBT RO TO RET AFTER ONE PASS 

MOV a-1, ECPOSx EXP Bos T TO O ON NEXT BIT 

INC STMPS :BUMP SWITCH 

BR 3$ :GO DO LOOP AGAIN 


Jen RA. GETREG Gee "OTT Recrsters 


Bi LaSeleEaeE cos [967 RERES'Rho Bho 


BIC #G0,E. 
CMP T.CS1,£.CS1 HECK $e CS1 CORRECT 
6$ YES - SKIP 

ERROR 44 

IT $ECH, T.ER ;TEST IF ECC HARD ERROR SET 
BEQ 7$ ;NO_-_ SKIP 
MOV #D0CK,E.ER SET EXPECTED ERROR REG 
ERROR 45 


ATEST SIS READ DATA METH 11 BIT BURST ERROR 


READ DATA WITH 11 BIT BURST 


gan ris CONTROLLE' it A ODE, TSSUE woe 
Miss ee n D BGNOS TIC. MODE A_READ DATA 


CC INDICATING 
Y’ THE COUN I THE POSITION 


sg EEA Seana 


Jepgrezgggeevtseesstnsenesnennenesneenneeeaneennnncoe 


MOV #1, STINES DO} TERATION 
CLR BSEDES tALE SEC DESIRED 
MOV #CCLR,RKCS1(R2) ;CLEAR CONTROLLER 

CLR HIBITS ; CLEAR, H BITS 
JSR R4, LOADRK chap oh Re TERS 

0 CYL INDE 

“BYTE O ; SECTOR §° 

"BYTE O RACK O 

IBUFF ‘BUFFER ADDRESS IBUFF 
-400 :WORD COUNT -400 
RDDATA ‘COMMAND RDDATA 

ISR R4, CLRIBF ;GO CLEAR INPUT BUFFER 
JSR R4, BLDDAT ;GO BUILD DATA 

7 :PAT TERN 7 


CZR6EBO RK611 OSKLS CTRL PRTS 
Pil O02-DEC-77 10:21 


CZR6EB. 


OO NOU £ 


eames 


REE 


S888sss 
OOD 


010234 012700 
010240 012737 


Bidess 018737 


032760 
000403 
042760 
0 004437 
4 : 37 
O3ee 104005 

194006 
INYUNg7 
010330 4 


O04 .u. 
Bue ib4o11 
nye 


1 
ist 
104014 


ee Wa? 


iG) 
o 
£ 
| mend 
ere 
<= 
Oo 
_ 
ov 


ae 
Say 


1B40N5 
012737 
018701 
0050. 


TOES Reworcw 


2 2222 2222272 


000 2000 
a ee ey te 
oo 


P 

o 

uo 
= 
N 
w 
N 


018237 


000S30 


177446 
457 


1 
000100 
000100 
000100 


032274 
023334 


023316 
023740 


024276 


026500 


3161 
Bapnes 


MACY11 30(1046) 


047636 


047636 1903: 
101$: 


002346 
002350 


002326 


002214 


T13 


38: 


O2-DEC-77 10:43 PAGE S93 SEQ 0059 
READ DATA WITH 11 BIT BURST ERROR 


MOV #530,R0 ;SET INDEX INTO BUFFER 


MOV #177446, OBUFF +1000 ;STORE ECC WORDS 
MOV #15457 7 ,OBUFF+100 


MOV jSET SOURCE TO INDICATE ECC IN BUFFER 
BIT tette, OBUFF(RO) ;TEST IF BIT SET oS" 6 
Bis 6, OBUFF (RO) LEB séY! te , 

BIC #B1T6,OBUFF(RO) ;CLEAR BIT 


;START THE OPERATION 


JSR RY, OPSTRT 
;SIMULATE IMPLIED SEEK 
MISCOMPARE 


JSR R4; DISEEK 


ERROR 4 ;CS1 
ERROR 5S ;MR1 
RR 6 :MR2 ps 
ERROR 7 ;MR3 9s 


JSR R4,DSECTR 
JSR RY, DRSYIC 
10 


;SIMULATE SECTOR PULSE 
Yi oe reaoer PREAMBLE 


ERROR 1 CONT NTS IN RROR 
ERROR 11 tet SNTENT RROR 

JSR Rat, DHOCMP ; SIMULATE HEADER SE ARCH 

RROR 18 eet n ERR AP ERROR SEARCH 

ERROR 14 ?RKOCYL DA IN ERROR AFTER SEARCH 
Be FO" eee 
ERROR 4B ical = READ] REAGING GAP 
ERROR 33 :CS1 IN Re OO ENERO ING SYNC 

MOV #1, ECPATX ; PasT yon 
MOV #066 ECPOSx ib 

Mit wm, DREN : ie TO SI 
ERROR ay i Ne z ae DATA 5 OR ECC 
ERROR 36 :CS1 ERROR AFTE BOING DATA OR ECC 
ERROR hf jECC REG INCORRECT, AFT ER ECC READ 
RROR 4 sERR ih EEE POS eBbNt 
Mov #20 BITCNT ;SET BIT IT COUNT FOR pSORRECTION ¢ COUNT 
MOV #73672, Ri ger count FOR EEEB $2 56 B rt FERST PASS 
CLR :CLEAR SWITCH 
eR PET ECEGEN + GENERATE ECC 
MOV RKEEPT Re), T.ecpt ;GET PATTERN 


046) O2-DEC-77 10:43 PAGE 60 SES 0060 


CZR6EBO RK611 DSKLS CTRL PRIS MACY11 30(1 
T13 READ DATA WITH 11 BIT BURST ERROR 


CZR6EB.P11 Oe-DEC-77 10:21 


3068 010470 016237 000030 o02212 MOV RKECPS(R2),T.ECPS -GET POSITION 
1 7 235) INC ECPOSX ;BUMP_POSITION EXPECTED 
1 i 37 o022s2 MOV ECPOSX,E.ECPS SET FOR COMPARE AND REPORT 

3378 i 1 373 4 002214 ch EECPT, T-ECPT ; CHECK IF ECATTERN CORRECT 

7 1 é ERROR 42 4 
3078 i 373 oo02252 o02212 1S: che EECPS, T.ECPS ; CHECK IF PosiTION CORRECT 
3076 1 ERROR 43 : 

7 1 e3 002326 2s: INC BITCNT ;RUMP BIT COUNT 
3078 010540 1 DEC Ri ‘DEC COUNT TO ZERO IN ECCPOS 
ogo Sibets RLS me BEC Pres” Fomu of eBuwt 
3081 O1 0014 BEG 4§ :IF O - SKIP 
308¢ 195 b1e737 177777 002350 MOV #-1, ECPOSX j PRESET EXPECTED POS TO GO TO ZERO 
30 1 12701 MOV #20000, R1 ;SET COUNT TO NEXT O IN ECC POS 
3084 010562 000733 :GO DO LOOP AGAIN 
3OBe 10564 005737 001214 4S: TST STMPS ;TEST SWITCH 
3087 10570 O0101¢ BNE :ALREADY SET - SkIP 
3089 G1de7e o1S7oH Opodo: Mov wieRB’ Peer GOvTO RETURN AFTER ONE PAS 
3090 910606 O1e7 7 ierere 002350 MOV a-1 ECPOSX i SET EXP POS TO GO TO O ON NEXT BIT 
3091 01061 1214 INC STMP ;BUMP SWITCH 
303¢ 010614 000716 BR 3s +GO DO LOOP AGAIN 
3094 010616 004737 031616 Ss: ISR PC,ROBIT : MORE BIT TO SET READY 
3036 O1 2 032 JSR R4’GETREG i GE Ay GIST 

9 O01 13737 002260 002220 MOV L.¢S1,£.CS1 *GET EXPECTED C 
3097 O1 052737 100200 O0e220 BIS #ROY'CERR,E.CS1 ;SET READY AND ERROR 
3098 01064 O48? 000001 002220 BIC #G0,E.CS1 :CLEAR GO 
3039 106 g237 7 002160 O02220 cn T,CS1,£.CS1 i CHEC IF gS CORRECT 
3163 Oloees Aoosic Be 3g 
3103 O1Gbe 32737 000100 002174 6S: BIT #ECH, T.ER ;TEST IF ECC HARD ERROR SET 
3195 010674 012737 100000 002234 MOV #0CK,E.ER :SET EXPECTED ERROR REG 
3106 010702 10404S ERROR 45 
310 
2ite 010704 73: 
3110 ee KHKAAKAKSARARAAKSZAAAAARRAARSRARARHRAKRERARARAKERRKARAAHRRRKRERKERHRHKE 
3iil j ATEST 14 READ DATA WITH ONE BIT BURST ERROR (PART 2) 
3113 $x CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
atic HH OF 4H WORDS T0-AN Ri ing Moreton FORMAT, ~ Oe 
3116 1 CYLINDER O HERD T mur ages THROUGH SEEK 
atts + A D DRIVE Sue BATA WORDS CAND AN EEE INDICATING 
3119 : A ONE ert BURST ERROR OF A i THAT SHOULD BE A O. 
3120 ti VERIEY COUNT OF THE POSITION 
31e1 a REGISTER HE FINAL PATTERN AND POSITION INFORMATION. 
sige i MAKE SURE DATA CHECK AND CONTROLLER ERROR SETS. 


JOS 


CZREEBO. RK611 DSKLS CTRL PRTS MACYII1 30( 1046) O2-DEC-77 10:43 PAGE 61 SEQ 0061 

CZR6EB.P11 02-DEC-77 10:21 READ DATA WITH ONE BIT BURST ERROR (PART 2) 

3iga 010704 04 ee ee 
3ige 010706 50909? 000001 001234 MOV #1,STIMES ;;DO 1 ITERATION 

3128 010714 005037 o0e35e2 CLR BSEDES ;CLEAR BAD SEC DESIRED 

3 § 010720 012762 100000 oD00000 MOV #CCLR,RKCS1(R2) ;CLEAR CONTROLLER 

3131 010726 005037 002354 CLR HIBITS ;CLEAR HI ORDER BITS 

3135 1073¢ 004437 032230 JSR R4, LOADRK jLOAD FL ste REGISTERS 

134 010740 000 -BYTE O SECTOR he 
3135 10741 000 ‘BYTE O TRACK O 
3136 1074 046632 IBUFF ? BUFFER ADDRESS IBUFF 
1 10744 177400 -400 WORD COUNT -400 

3138 01074 o00021 RDDATA COMMAND RDDATA 

3140 010750 004437 031770 ISR R4, CLRIBF ;GO CLEAR INPUT BUFFER 

3i4e 010754 004437 032014 JSR R4, BLDDAT ;GO BUILD DATA 

3143 010760 ooo000S 5 :PATTERN 5 

31s 010762 012700 000530 MOV #530, RO ;SET INDEX INTO BUFFER 

3147 010766 012737 126073 050636 MOV #126073, OBUFF+1000 ;STORE ECC WORDS 

3148 010774 012737 151052 O50640 MOV #1510S2. OBUFF +1002 

3149 011002 012737 000001 002344 MOV #1, ECCSRC ;SET SOURCE TO INDICATE ECC IN BUFFER 
3150 611818 O32? 000100 047636 BIT #BtT6, OBUFFC(RO) ; TEST If BIT SET 

3152 11020 056750 000100 047636 BIS #BIT6,OBUFF(RO) ;ELSE SET BIT 

3158 611030 042760 000100 047636 1008: BIC #BIT6,OBUFF(RO) ;CLEAR BIT 

31 : 

3128 011036 004437 032274 ISR R4, OPSTRT ;START THE OPERATION 

3158 11042 OOH 3” 023334 ISR RY, * DISEEK uM ATE open SEEK 

31e0 011059 {Bug ERROR 5 :MR1 

3161 O1105e 1 ERROR 6 !MR2 ” 

3ibe 011054 104007 ERROR 7 :MR3 ° 

3164 011056 004437 023316 JSR R4,DSECTR ;SIMULATE SECTOR PULSE 

air QLIBEE PBiaye 969740 $fog Fy —HRATMRSTE NREER Frege 

3168 011070 104011 ERROR iil :CS1 EONTENTS N ERROR 

3170 011072 004437 024276 JSR R4, DHDCMP ; SIMULAT ADER SEARCH 

3171 011076 1040le ERROR ! :MR1 CONTENTS IN ERROR 

3172 011100 104013 ERR i3 :CS1_IN ERROR AFTER SEARCH 

3173 011102 104014 ERROR 14 ?RKDCYL RKDA IN ERROR AFTER SEARCH 
3175 011104 437 026500 ISR R4, DRGPSN ;GO READ AND SY 

3176 O11110 104015 ERROR 15 :MR1 IN ERROR READING GAP 

3158 O11tia to4pS8 ERROR 38 iGRL IN ERROR READING SYNC) 
3179 O11116 104033 ERROR 33 :CS1 IN ERROR AFTER READING SYNC 


keneeec oy maa OSKLS CTRL PRTS 


CZR6EB.P O02-DEC-77 10:21 
3180 

181 011120 012737 oOOo0001 
3182 Ollle& O12737 OO4OEE 
3183 Bi its y 027176 
318s Ollie 104034 

aig? aL 1DdO3e 

3i8e Gilis8 1oWoal 

3190 011154 104043 

3191 

alas 

3193 Bt tee 012737 oo0o02e0 
3194 11164 012700 000s 
319S 011170 pie os 013672 
ai 011174 goOoSO03 001214 
3198 Bi Lege 004737 031616 
31939 11600 7 Ban} 
3200 Olleio 16237 0032 
3201 Ollelé 16237 OO 
ae SES Bie Bes 
3503 11 2eS4 
3505 i iSue Igoe 

3508 11 3 o022eS2 
3208 ll 1401 

3208 O11 Megtad 

3210 lle 00S2. 002326 
35th 11 poosud 

sel lle 134. 

3213 Olle7e 005300 

3214 Bile? pes 

3215 11678 127. 177777 
3el6 Oll 12701 000) 
Sst 011310 000733 

3219 O113le 005737 o01214 
3220 Bt take 00101le 

3221 011386 12701 gose7e 
3323 wee Bisa La7e7, 
ase Bit 42 000716 

3°27 O11344% 004737 031616 
32. 11350 004437 032356 
32 11354 B437 260 
32 11362 737 1009200 
353) Bt ise? 27. 000001 

32 1137 3737 002160 

3233 O11404 OO014 

3234 O11406 104044 

3235 011410 ooo410 


002346 
002350 


002326 


002214 
00ee12 


eeSe 
2el4 


002212 


002350 


002350 


o02220 
O0eee0 
0022e0 
002220 


3S: 


4S: 


S$: 


02-DEC-77 10:43 PAGE 62 
READ DATA WITH ONE BIT BURST ERROR (PART 2) 
MOV #1, ECPATX sL EXPECTED PATTERN 
MOV #4066, ECPOSX it OAD E CTED POSIT ION 
JSR R4, DREAD ;60 SI 
400 : R a7 Ge SIMULATE 
ERROR 34 :MR1 IN ERROR READING DATA OR ECC 
ERR 35 :ECC ERROR READING DATA 
ERROR 36 ?CS1 ERROR AFTER READ’ 3 DATA OR ECC 
ERR 41 :ECC REG INC CT AF. 2% ECC READ 
ERROR 42 "ERR IN ECC PAT CALC. 
ERROR 43 :ERR IN ECC POS COUNT 
MOV #20, BITCNT ;SET BIT COUNT FOR CORRECTION COUNT 
MOV 0 :SET COUNT FOR ECCPOS PASS THRU 
MOV #13672,R1 ‘SET COUNT FOR ECCPOS TO 0 FIRST PASS 
CLR STMPS :CLEAR SWITCH 
ISR PC,ROBIT ;GO READ BIT 
JSR PC: ECCGEN {GENERATE ECC 
MOV RKECPT (Re), T.ECPT ; PATTERN 
MOV RKECPS(Re),T.ECPS *GET POSITION 
INC CPOSx : POSITION XPECTED 
MOV CPOSK,E EceS ?SET FOR COMP: AND REPORT 
CMP -ECPT,T.ECP :CHECK IF PATTERN CORREC 
BEQ 1S :YES - SKIP 
ERROR 42 
CMP E.ECPS,T.ECPS ;CHECK IF POSITION CORRECT 
BEQ 2s :YES - SKIP 
ERROR 43 
INC BITCNT ;BUMP BIT COUNT 
DEC Ri :D C Cc TO zB op ECCPOS 
BNE 3$ : Y' nZERO = 
DEC 0 :DEC 
BEG ug :IF O - P 
MOV #1 ,ECPOSX :PRESET EXPECTED Pos TO GO TO ZERO 
MOV #20000, R1 *SET COUNT TO NEXT O IN ECC POS 
BR :GO 00 LOOP 
TST STMPS ;TEST SWITCH 
BNE cs *ALREADY SET - SKIP 
MOV #5276,R1 :SET COUNT TO FINAL POSITION 
MOV 5 :SET RO 19 RETURN AFTER ONE PASS 
MOV #-1, ECPOSX :SET EXP POS TO GO TO O ON NEXT BIT 
INC STMPS *BUMP SWITCH 
BR 38 ?GO DO LOOP AGAIN 
ISR PC, RDBIT ; ONE MORE BIT TO SET READY 
JSR R4'GETREG :GET 611 REGISTE 
MOV L.¢S1.€.CS1 i GET EXPECTED csi 
BIS #ROY!CERR,E.CS1 ;SET READY AND ERROR 
BIC #GO,E—.CS1 LEAR GO 
CMP T.CS1,£.CS1 i SHECK IF CS1 CORRECT 
BEQ $ YES - SKIP 
ERROR 44 
BR 7g 


SEQ 0062 


cgneege eis OSKL 


CTRL PRTS 


Oe-DEC-77 10:21 


ey 


32 011430 
3240 
3e41 011432 
3e42 
3243 
3244 
3245S 
3246 
3247 
3248 
3523 
SO 
3251 
3eSe 
3253 
S4 
S 
256 
a, SINE 
oS 
: 011442 
011446 
3263 
264 Ot ied 
65 011460 
3266 011464 
3267 011168 
3e 01146 
32693 atte 
3270 01147 
3271 011474 
3e7: 
3273 011476 
3274 
3e7S 011502 
3578 011506 
3578 011510 
3280 011514 
3281 Bt ese 
ae 
gee4 011544 
ee Clie 
328 
3288 011564 
3289 011570 
3290 Biles. 
3291 11576 


O1%54 
127 7 


104045 


000004 
012737 


005037 
012762 


poaa37 
000000 

000 
046632 
177400 
ooo0de1 
004437 
004437 
ooo000S 
012700 


012737 
012737 


LOS 


MACY11 la O2-DEC-77 10:43 PAGE 63 


READ DATA WITH ONE BIT BURST ERROR (PART 2) 


000100 002174 68: pit 2 Rapa jest ie ECC HARD ERROR SET 
100000 002234 MOV #OCK,E.ER ;SET EXPECTED ERROR REG 
ERROR S 
7$: 


ocooo1 
002352 
100000 


e354 
32230 


031770 
032014 


032274 
023334 


001234 


000000 


jymogengenanausosescoseenrerr Latte 
T 15 READ DATA WITH 11 BIT BURST ERROR 


pure RK611 CONTR ER W W TH A CONTROLLER CLEAR. 

CONTROLL OLLER IN C MODE. ISSUE A READ DATA 

oF 300 : Rioe | ser Ok THROUGH SEEK 

Bn BR DRIVE bee PP absasis™ imMULATE A OEY oR Bir Se 

A GOOD TA onBt AND AN ECC INDICAT TING 

AN TERROR R FY COUN NG OF THE POSITION 

REGI by iY anbe HE FINAL PATT POSITI NFORMATION. 
SURE DATA EMECK RAND CONTROLLER ERROR ge te 


H seosssgaazzesuanenneeneeneesnssssussnceennnnenesenesnosssssssss 
“MOV #1,STIMES ;;D0 1 ITERATION 
CLR BSEDES ;CLEAR BAD SEC DESIRED 


MOV #CCLR,RKCS1(R2) ;CLEAR CONTROLLER 


SN NOCH HCH HC em 


CLR HIBITS i CLEBR HI ORDER BITS 

- R4Y, LOADRK :EYLINOE oer es ISTERS 
-BVTE 8 Crono 

IBUFF TRA ADDRESS IBUFF 
400 ;WORD COUNT -400 

RODATA ;COMMAND RDDATA 

JSR R4Y, CLRIBF ;GO CLEAR INPUT BUFFER 

JSR R4, BLDDAT ;GO_ BUILD DATA 

5 ;PATTERN 5 


;SET INDEX INTO BUFFER 
;STORE ECC WORDS 


MOV #530,R0 


MOV #126073, Cour eee 
MOV #151052) OBUFF +1 


al EC cs ¢ SET SOURCE TO INDICATE ECC_IN BUFFER 
BIC tT$*B1T11, OBUFE CRO) EATE 11 BIT BURST ERROR 
BIS egITg!BITL2!B1T14, ORUFE Fao) 


RO ;BUMP TO NEXT WORD 
BIS watto, OBUFF (RO) 


JSR R4Y, OPSTRT ;START THE OPERATION 
JSR R4; DISEEK ; SIMU Mote a SEEK 
ERROR 4 ;CS1 MISCOMPARE 

ERROR 5S ;MR1 


SEG 0063 


Sh: ee OSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 64 SEQ 0064 


02-DEC-77 10:21 TiS READ DATA WITH 11 art BURST ERROR 
3292 011600 104006 ERROR 6 ;MR2 “ 
3633 011602 104007 ERROR 7 :MR3 ° 
3535 011604 004437 023316 ISR R4,DSECTR ;SIMULATE SECTOR PULSE 
011610 004437 023740 JSR R4, DRSYNC ;SIMULATE HEADER PREAMBLE 
3298 011614 104010 ERROR 10 :MR1 CONTENTS IN ERROR. 
3506 011616 104011 ERROR 11 :CS1 CONTENTS IN ERROR 
: 1 011620 004437 024276 ISR R4, DHDCMP ;SIMULATE HEADER SEARCH 
3302 Ol 1628 104012 ERROR 12 nay So CONTENTS IN ERROR 
3303 ‘BLESS 1 uote ERROR 14 Ge bc tt! eRe Roa IN ERROR AFTER SEARCH 
1 437 026500 R R4, DRGPSN :G 
3307 ts 104015 2RRoR is’ if PERO ESROR BING GAP 
3 11649 104016 ERROR 16 3c csi IN IN ae path READING GAP 
ae pt teas 1Bup35 ERROR 3§ ite Sl 1h ERROR PPAR AD ING SYNC 
id 01164% 012737 O00001 o02346 MOV #1, ECPATX ;LOAD EXPECTED PATTERN 
3313 011654 012737 OO4066 002350 MOV #4066, ECPOSX jLOAD E cTED P ETION 
sie ot ieee B30406 027176 JSR R4, DREAD 3G FUL i Pas aus 
3 1 {ie58 1 Go94 ERROR 34 in 1 R DING Date OR ECC 
3317 011672 10403S ERROR 35 6 ECC 
3318 011674 104036 ERROR 36 3C e RROR AF at NEERDING DATA OR ECC 
01167 104041 RROR 41 iE G_ Ane Pou. AFTER ECC READ 
11 10404 RROR 42 iE RS oN ECC 
3321 011702 104043 ERROR 43 ;ERR IN ECC POS 
3323 
11704 012737 20 002326 MOV #20, BITCNT OUNT FOR CORRECTION COUNT 
ies O11712 S18780 odode Roy «SSAA «SET SOUNT ron ECceoe RSS THRU O. 
337 Bi1538 BaEgg+ bA7875 CLR #1362 : ie ITCH 
3329 011726 004737 031616 3S: ISR PC, RDBIT ;GO READ B 
30 11736 7 2 JSR PC ECCGEN * GENERA E ef 
1 0117 ibe 002214 MOV RKECPT (Re), T.ECPT PATTERN 
333¢ 11744 1 00 002212 nov Ke Ces (RE), T-ECPS iGe ITION 
ne 
3 cs 117ee 1 Bas 002252 MOV gS X,E£.ECPS eur FOR TTioN PprPee FO DORT 
3 11764 Oe 737 O02254 002214 CMP E.ECPT;T.ECPT 5 CHECK ire PATTERN ARORRECT 
3336 011772 1401 BEQ 1s 
3337 011774 104042 ERROR 42 
333 ot 776 rake 002252 oo2212 1S: cn E,ECPS, T.ECPS lil Bb POSITION CORRECT 
12008 o4 ERROR 4 
33u2 eat $3 eames -” are oes :D PB uNTS ? ZERO N ECCPOS 
343 018016 4 N 35 et Ye ET _ZER 102 Sop 
344 Ol 3 DEC RO HRU a COUN UNT 
3345 g1e0ee O01408 BEQ 4g EC,PA K 
33 12024 012737 177777 002350 MOV #-1, ECPOSX ipP Os XPECTED POS TO GO TO ZERO 
3347 012032 012701 Geo0000 MOV #20000, R1 :SET COUNT TO NEXT O IN ECC POS 
| 


CZR6EBO RK611 OSKLS CTRL PRTS 
CZR6EB.P1 


1 
33) 012036 000733 
3350 012040 737 
3351 iSoue o10he 
ej Gletee Glare 
35S Bisoes Bases? 
$228 012070 000716 
3324 012072 0047 
3353 Ol 004437 
$300 lel Rha? 7 
1 Olell 737 

3362 Olellb pases 
3363 QleleY 737 
3364 1si36 1402 
3365 Qlel 104044 
3366 O12136 000410 
3367 pis iy 032737 
3368 012146 001404 
3369 012150 012737 
3370 O1e21S6 10404S 
3371 

3372 012160 

3373 

3374 

3375 

3376 

3377 

3378 

33793 

3380 
3381 
3382 

3383 

3384 
3385 
3386 

3387 
3388 012160 oO00004 
$382 Olel6e 012737 
33391 012170 005037 
308 012174 Ole76e 
3394 Ole2e02 005037 
3395 Bi ssos 004437 
3396 Oleele 000000 
3397 012214 000 
3398 OQleeis 000 
33393 pisels 046632 
3400 Oleee0 177400 
pay Oleeee O0000e1 


3403 Ol2224 004437 


O2-DEC-77 10:21 


000100 
100000 


000001 


002352 
190000 


002354 
032230 


031770 


MACY1i 


002350 


002220 


* Q0ee2e0 


002220 
002220 


002174 
002234 


001234 


000000 


NOS 


30(1046) O2-DEC-77 10:43 PAGE 65 SEQ 0065 
TiS READ DATA WITH 11 BIT BURST ERROR 
BR 3$ ;GO DO LOOP AGAIN 
4S: TST STMPS ;TEST SWITCH 
BNE S$ * ALREADY SET - eSkIP 
MOV #5310,R1 :SET COUNT TO FINAL POSITION 
MOV #1,R0 :SET RO TO RETURN AFTER ONE PASS 
MOV a-1 ECPOSX ‘SET EXP POS TO GO TO O ON NEXT BIT 
INC STMPS :BUMP SWITCH 
BR 3S *GO DO LOOP AGAIN 
S$: ISR PC, RDBIT ;ONE MORE BIT TO SET READY 
JSR R4'GETREG ‘GET ’611 REGIST ERS 
MOV L.¢Si E.cS1 GET EXPEC TED C 
BIS #ROY!'CERR,E.CS1 ;SET READY AND ERROR 
BIC #GO,E. ; CLEAR GO 
CMP T.CSI,E.CS1 ;CHECK IF CS1 CORRECT 
BEQ 6$ :YES - SKIP 
BR’ 2g 
6S: BIT #ECH,T.ER ;TEST IF ECC HARD ERROR SET 
BEQ :NO_ SKI 
MOV #OCK,E.ER :SET EXPECTED ERROR REG 
ERROR 45 
78: 
: j TERRE RENE Eee TTR uit le BIT BURT ERROR 
; ATE READ DATA WITH 12 BIT BURST ERROR ‘ 
3% 
ae CLEAR RK611 ER WI WITH A CONTROLLER CLEAR. 
: PUT CONTROLLER IN Pas a TSSUE A READ DATA 
1 a 400 WORD Roe T iy SECTOR FORMA 
1a CYLINDER O SyeRD CLOCK R ARouGe SEEK 
1 i AND DRI CLEAR es oSAMULATE A SECTOR PULSE, A 
1 GOOD [D AN ECC INDICATING 
1 a l2 BIT TERROR . VE fry THE COUNTING OF THE 
1% POSTTION REGISTER. MAKE SURE DATA CHECK, ECC HARD, 
i AND CONTROLLER ERROR SETS. 
H = RKRKEREEEEKERRREE RRR RR KARA RE RRR SHEARER RRRARRAAAARARAARAAEE 
+éT16: SCOPE 
MOV #1,STIMES ;;D0 1 ITERATION 
CLR BSEDES CLEAR BAD SEC DESIRED 
MOV #CCLR, RKCS1(R2) ? CLEAR CONTROLLER 
CLR HIBITS ;CLEAR HI ORDER BITS 
ISR R4, LOADRK *LOAD “L”™ REGISTERS 
0 :CYLINDER O 
-BYTE O ; 
‘BYTE O * TRACK O 
IBUFF jBUPFER ADDRESS IBUFF 
-400 D COUNT -400 
RDDATA + COMMAND RDDATA 
ISR R4, CLRIBF ;GO CLEAR INPUT BUFFER 


ceneeRO. — OSKLS Crm. PRTS 
CZR6EB.P O02-DEC-77 10:21 


032014 


aaa 


i bo bb 


Pee eee ee y ++ 4 
OD NO UL wre 


2 

mt 

rv 
ooo 
tee 


re ao 


LEQEEOYBEEEEQEQUogesyoogudyaD 
Miaqaaaesesaa seas ctnmttntryt 
o000 ONOQ00000000 O0000 O2000 OOO 


12344 
1 


PRSE RESO 
2 
fu 
3 


= oe 
Ww 
Q ha 
hee pe be 
Oo 
2999 
ws 


: 


LSS GRewns 


026500 


Sie BS 


wW 
Pee 


e222 


000001 
004066 
027176 


ese eran 
zeeggaRgR 


eo ee 
We 


eee PPPPeP Pee? F 
Reo RERERERTOW Be 


Pee 
oO 
£ 


ul 
UP 4 
eee 


MACY11 


002346 
002350 


002326 


(1 
16 


O46) 
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O2-DEC-77 10:43 PAGE 66 
READ DATA WITH le BIT BURST ERROR 


etetaf t=) 


R4, BLDDAT ;GO BUILD DATA 
:PATTERN 5 
#530, RO ;SET INDEX INTO BUFFER 
#126073, OBUFF +1000 ;STORE ECC WORDS 
#151052: OBUFF +1002 
al ECC -SET SOURCE TO INDICATE ECC_IN BUFFER 
t 9!B1T11, OBUF OBuFFTRO)  ;CREATE 11 BIT BURST ERROR 
#8176!81T12!B1T14, OBUFF CRO) 
#2 RO ;BUMP TO NEXT WORD 
#6iTG, OBUFF (RO) 
#BI1T1’OBUFF(RO) ;MAKE IT A 12 BIT BURST ERROR 
R4, OPSTRT ;START THE OPERATION 
R4; DISEEK :SIMULATE IMPLIED SEEK 
4 ;CS1 MISCOMPARE 
5 :MR1 
6 ;MR2 oo 
? > MRS ° 
R4, DSECTR ;SIMULATE SECTOR PULSE 
R4, DRSYNC SIMULAT R PREAMBLE 
10 1 CON ENT N ERROR 
ll fe EONTENTS N ERROR 
RY, DHDCMP ina ton 
is iat Gr tbee Pek anc 
s 
14 ?RKDCYL it ER Ron IN ERROR AFTER SEARCH 
R4, DRGPSN ;GO READ GAP AND SYNC 
1S :MR1 IN ERROR ING GAP 
16 ?CS1 IN AFTER READING GAP 
32 :MR1 IN ERROR RE ING SYNC 
33 'CS1 IN ERROR AFTER READING SYNC 
#1, ECPATX ;LOAD EXPEC PATTERN 
#4066 , ECPOSX kL EXPECTE POSITION 
R4, DREAD ;GO SIMULA T AD 
: R OF TO SIMULATE 
4 *MRL IN ADING DATA OR ECC 
S "ECC ERR RRO AD NG DATA 
36 ?CS1 ERROR AFTER READING DATA OR ECC 
41 tECC REG INCORRECT AFTER ECC 
42 *ERR IN Ecc PAT CALC. 
43 :ERR IN ECC POS COUNT 
#20, BITCNT tee] BIT COUNT FOR CORRECTION COUNT 
. :SET COUNT FOR ECCPOS PASS THRU O 
#13672,R1 :SET COUNT FOR ECCPOS TO O FIRST PASS 
S$TMPS :CLEAR SWITCH 


O02-DEC-77 SES 0067 


READ DATA WITH 
PC,ROBIT 


CO6 
ih 12 ett BURST ERROR 


Snr? y RK611 OSKLS cm PRTS 


MACY11 “75 pO? 
ZREEB.P11 Oe-DEC-77 10:21 16 


Net 1616 3$: JSR 


nov RueEBT (Re), T. gah corre TERN 


CPS BUMP mee pobition bs EXPECTED 
Ere EF ieheck ir HECK IF “pat FERN CORRECT 


eEttaeE 


bb 


pigise 
A : 324 
012526 1401 BEQ - 
ayes 8tSe38 483935 ENpo’ 
002252 oo02212 1S: -ECPS, T.ECPS $ CHECK IF ‘postTt0n CORRECT 
BA hes te ie 8 nti 
cA 002326 2s: NC BETCNT ; BUMP 
3473 0 sees pares DEC eH Rot es coon ZERO N ECCPOS 
3u5¢ Bt BRE 2 ; “o¢ COUNT 
3493 13560 ot As 77777 002350 Say - CPOSX Ek ch TE h05 TO GO TO ZERO 
8 188 i o1 MOV #20005, Ri 6 he 0 IN ECC POS 
34a0 ~ _ 
Sugs fideo Points COLelY WS: gmeté«éiRS'™?S’ E31 gut ~ SKIP 
Hes Giese Biergl gio Roy Hoput,ml SET eR POSITION <. 
3485 0126 012737 177777 002350 MOV #-1, ECPOSX :SET EXP POS TO GO TO O ON NEXT BIT 
1 O05e37 001214 ENC TMPS ;BUMP SWITCH 
1 16 ?GO DO L AGAIN 
3489 O01 7 : R T : T READY 
3490 pisess poaaa> §33826 - Jen PS’ Be FREG ene Ort 6 bil feast ERS . 
3491 012636 013737 002260 o02 MOV L.¢S1,£.CS1 :GET EXPE csi 
3 12644 7 goeee0 BIS #ROV!CERR,E.CS1 :SET RE ¢ "BRO ERROR 
4 1 7 i 220 ct #G0,—.CS1 ?CLEAR 
3134 ol G23732 160 002220 cnr T,C51,£.CSi i CHEC IF gst CORRECT 
3436 steers aoti9 ERROR a4 7 
3438 O1ser4 32737 000100 002174 6S: err AECH, T.ER . s TEST IF ECC HARD ERROR SET 
00 012704 737 ' ; : 
350 012704 o16737 100100 002234 HOV ack ECH,E.ER SET EXPECTED ERROR REG 
3503 012714 7S: 
3S : eee eee D DATA ULI 23 Bit BURST ERROR 
3508 j ATES READ DATA WITH 23 BIT BURST ERROR 
08 is LEAR RK 41 ¢ WITH AC CLEAR 
3503 if ugOnt ROLLE fora aesee rife ion Fitted READ DATA 
3511 % eyLINDER 7" OR Q, 
3512 <i SND DRIVE LEAR intate ears cats PULSE, A 
3513 1 a GOOD HEADER, 400 Ariat AN ECC" NOICATING 
3514 1% A 23 BIT BUR CRROR. VERIFY THE COUNTING OF THE 
3515 1 POSITION REGISTER. MAKE SURE DATA CHECK, ECC HARD, 


RK611 OSKLS CTRL PRTS MACYI1 (1046) O2-DEC-77 10:43 PAGE 68 Q 
ESReEB eT B3<bec<79 10:21 393 READ DATA WITH 23 BIT BURST ERROR er 


351 ;# AND CONTROLLER ERROR SETS. 
zie HFC dalla 
at bisrie On 2737 000001 001234 nov #1,STIMES ;;DO 1 ITERATION 
= 813730 Bis?e2 100000 000000 Soe «SECA RKcSicRe) {CLEAR CONTROLLER 
012736 005037 002354 CLR HIBITS ; CLEAR HI ORDER BITS 

3526 Sie7He 004437 032230 JSR R4, LOADRK OAD mL REGISTERS 
see. Siere ‘BE 8 Pek 
su Biever o6a5 Li eo Coot ago 
3830 12756 000021 RDDATA :COMMAND RDDATA 
3o34 012760 004437 031770 JSR R4, CLRIBF ;GO CLEAR INPUT BUFFER 
a 012764 g04437 032014 JSR R4, BLDDAT 60, UILD DATA 
ae 012772 012700 000530 MOV #530, RO ;SET INDEX INTO BUFFER 
3eu2 615004 Bisrar isioss OS0e40 HOV a1Si0e2, QeUFF 100g. ee ee 
35443 is b1s7a> A8h001 002344 MOV Lecce c ioe T SOURCE TO INDICATE ECC IN BUFFER 
2 Bt Beare Brest Be HN uannt Se ae 
Joe 013034 062700 o0000e . ADD ‘ sBUMP’ T 0 NEXT WORD 
34 Bi3a4e Besven Binond busEae Bie SET TOAORUFE CARD ;MAKE IT A 23 BIT BURST ERROR 
3550 013054 004437 032274 JSR R4, OPSTRT START alte OPERA 
322, 012060 Oo¥Na” 023334 JeR on RY, DISEEK isin lee TSteK 
3553 Ol 104005 RROR : 
Se ae Ee a: 
3557 013074 004437 023316 JSR R4, DSECTR ;SIMULATE SECTOR PULSE 
Seca Bi3iby Teudig %974° BRRon gr ORSYNC tARIUEONTENTS IN ERROR 
3561 013106 104011 ERROR 11 :CS1 CONTENTS IN ERROR 

S Bi8ii8 Poag7e 9eNe7® ERfor far OHDcne tARIUEONTENTS IN ERROR 
see SLRS IRB Fee boll Rol IN SR Here seoncn 
sere SIGIGE Opusgz cess 33h FS: ORCr SM rR UPSET cae 
3290 b1siso ft 104016 ERROR 1e icS1 tN ERROR RETER RENDING GAP 
3571 013132 104032 ERROR 32 :MR1 IN ERROR READING SYNC 


SO Ey Serr ees, 


Sl SS 


E06 


St RK6i1 OSKLS CT crm. PRTS MACY11 30(1046) -=DEC-77 10:43 PAGE 69 SEG 0069 
CZR6EB.P11 C-77 10:21 T17 RF DATA "with 23 BIT BURST ERROR 
3278 013134 104033 ExXROR 33 ;CS1 IN ERROR AFTER READING SYNC 


aA 
3 


7176 JSR R4, DREAD OT RULATE DATA 


127 0001 002346 MOV #1, ECPATX sL PATTERN 
O18737 Bode 002350 “QV #4066 , ECPOSX ; Eero EXPECT POSITION 
R 


rate 
@iouzu 


Rag 
2 
O0O00000000 


at be Be bee pis Be me ee bee pe 


WWWWWWWWWW 


Dae me ee ae ee ee 


TRATES 
=" A OR ECC 
ING DATA_OR ECC 


NIFTESROER 
28 
25 
3 
ee 
= 
at 


3 
35 
104036 RROR 36 CSi ERROR AFTER RE 

3287 1Bupas RROR 41 tECC REG INC CT AFTER ECC READ 

3582 104042 ERROR 42 ‘ERR IN ECC PAT CALC. 

3583 104043 ERROR 43 *ERR IN ECC POS COUNT 

3e6e 013154 

131 12737 000020 002326 MOV #20, BITCNT ;SET BIT COUNT FOR CORRECTION COUNT 

3288 Bt 3303 pte an 000005 MOV #5, R0 :SET COUNT FOR ECCPOS PASS THRU 0 

3588 01 3208 1 013672 MOV #13672,R1 :SET COUNT FOR ECCPOS TO 0 FIRST PASS 

3289 1321 001214 CLR STMPS :CLEAR SWIT ‘ 

353 1321 737 161 3S: ISR PC, RDBIT :GO READ BIT 

33: 1 ISR PC’ ECCGEN + BO NERATE 

35 1 1 32 go2e14 MOV RKECET( Re), T.ECet sGET PATTERN 

3594 O01 30 O0eel12 MOV RKECPS(Re),T.ECPS i 3 POSITION 

3595 013242 350 INC ECPOSX ;BUMP_POSITION EXPECTED 

3238 1 OL 350 go22se MOV ECPOSX, E. ECPS :SET FOR COMPARE AND REPORT 

g 1 254 214 CMP -ECPT; T. ECP :CHECK IF PATTERN CORRECT 

3598 Ol 00140 BEQ it} :YES - SKIP 

3599 013264 guoM ERROR 4e 

3600 i “tA oo022S2 oo2212 1S: cH E,ECPS, T.ECPS i CHECK IF POSITION CORRECT 

3602 013276 104043 ERROR 43 : 

3603 O01 002326 2s: INC BITCNT ; BUMP IT COUNT 

3604 o1 H DEC Ri ;DEC C 0 ZERO IN ECCPOS 

3605 01 1 BNE 35 :NOT YE JER O-L 

3606 013319 300 DEC RO j DEC PASS THRU O COUNT 

360 1331 1406 BEG 4§ :IF O - SKIP 

3608 013314 012737 177777 002350 MOV #-1, ECPOSX *PRESET EXPECTED POS To GO TO ZERO 

3609 013322 12701 OG20000 MOV #20000,R1 :SET COUNT TO NEXT O IN ECC POS 

3610 01 733 BR 3s :GO DO LOOP AGAIN 

3618 013330 737 001214 ug: TST STMPS ;TEST SWITCH 

361 13334 i012 BNE ? ALREADY SET - SKIP 

3614 O1 1g? 1 010041 MOV #10041,R1 : a COUNT TO FINAL POSITION 

3615 13348 12700 000001 MOV & :SET RO TO RETURN AFTER ONE PASS 

3618 1 127 177777 002350 MOV #-1, ECPOSX :SET EXP POS TO GO TO O ON NEXT BIT 

3617 013354 005237 001214 INC STMPS *BUMP SWITCH 

3618 013360 000716 R 3S :GO DO LOOP AGAIN 

3620 013362 7 1616 SS: ISR Pc, RD sONE MORE BIT TO SET READY ’ 

3621 BT S3Ee ete 2356 JSR ROP IEG one ’611 REGISTERS 

3622 013372 013737 O0e260 o02220 MOV Page —.CS1 :GET EXPECTED CS1 

3623 613400 052737 100200 OO0e2c0 BIS #ROY! CERR,E.CS1 ;SET READY AND ERROR 

36 13408 042737 000001 OO2220 BIC #G0,—.CS1° *CLEAR GO 

3625 013414 023737 OO02160 O0e220 CMP T.CS1,E.CS1 5 CHECK IF CS1 CORRECT 

3626 013422 BEQ $ YES - SKIP 

3627 013424 104044 ERROR 44 
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CZR6EBO RK611 OSKLS CTRL PRTS MACY11 30(104%6) O2-DEC-77 10:43 PAGE 70 SEQ 0070 
C2 1 02-DEC-77 10:21 Ti? READ DATA WITH 23 BIT BURST ERROR 
013426 00041 Z BR 7$ 
0134 032737 000100 oO02174 6S: BIT #ECH,T.ER ; TEST IE ECC HARD EPROR SET 
13438 901004 BNE 7$ sYES = KIP 
rl 12 37 100100 002234 MOV #OCK!ECH,E.ER ;S EXPECTED ERROR REG 
13446 104045 ERROR 45 
013450 7$: 
5 + KKH EKKREESEERRRERERRRAARRAARARERARERERAAA KARR RRARARRAAAHRAAAALEAAE 
jkr ST 20 READ DATA WITH 1 BIT ECC WORD ERROR 
i CLEAR RK611 a Tn bia WITH A,CON CONTROLLER CLEAR. 
1 i PUT ce ROL AGNOSTIC MODE. ISSUE A READ DATA 
Or INDE 4, HERO RKOR On 6 ser ook THROUGH SEEK 
1% END-DR BA MESSAGES. IMULATE A SECTOR PULSE, A 
1a poet 'OROS AND AN ECC C INDICATING 
1 i A 1 ty 2, BIT &. 
;# NG OF THE Neos Thor ORES STER. MEKE SURE DATA 
i SRECK AND CONTROLLER ERROR SETS. 
4 + REKRKKERKRAREEERREERERAERAARARRRKRKRERERKRARARLRRAAAA RR RARAKRAKEE 
013450 ooo0004 +éT20: SCOPE 
13452 012737 o00001 001234 MOV #1,STIMES ;;D0 1 ITERATION 
013460 005037 002352 CLR BSEDES ;CLEAR BAD SEC DESIRED 
13464 012762 100000 oo0000 MOV #CCLR,RKCS1(R2) ;CLEAR CONTROLLER 
013472 005037 002354 CLR HIBITS i CLEBR,, HI ORDER B 
134 437 032230 ISR R4, LOADRK 2 REGISTERS 
13¢58 PB ode 0 : ive 
13504 006 -BYTE 0O 
01350s 000 "BYTE O 
0135 O4b63¢ iBUFF UPFER "AD ESS IBUFF 
13510 1774 -400 WORD 
013512 RODATA + HORRAND SUNODATAS 
013514 004437 031770 JSR R4, CLRIBF ;GO CLEAR INPUT BUFFER 
013520 004437 932014 JSR R4, BLODAT ;GO BUILD DATA 
013524 0000 S ‘PATTERN 5 
013526 7 001002 MOV #1002,RO SET INDEX INTO BUFFER 
013532 BiS599 126073 050636 MOV #126073, oBuEF+ 1060 sSTORE ECC WORDS 
013540 012737 151052 o50640 MOV #151052: OBUFF +1 
13546 016737 000001 002344 MOV a ECCS Cc ise] SOURCE TO INDICATE ECC IN BUFFER 
: 54 Bs1058 0001 047636 BIT . tT6,OBUFFC(RO) ; TEST 1E 8 IT SET 
013564 2760 OO0100 047636 BIS #BIT6, OBUFF(RO) ELSE SET BIT 
013572 000403 ’ BR 101$ 
013574 042760 OO00100 047636 100%: BIC #BIT6,OBUFF(RO) ;CLEAR BIT 
13602 1018: 
013602 004437 032274 ISR R4, OPSTRT ;START THE OPERATION 
013606 004437 023334 JSR R4’ DISEEK :SIMULATE IMPLIED SEEK 


ceneeee 1 we OSKLS cm PRTS 
CZR6EB.P 


Oe-DEC-77 10:21 


013622 004437 023316 
3 1 OidiD 023740 
38 Bt 104010 
3a5 013634 104011 
1 437 O24276 
S35 913696 onNNa7 
3697 gisele ia 
a4 13646 1 14 
3700 013650 004437 O26500 
7 1 te) 104013 
7 1 ite 16 
37 1 104032 
3708 O01366e 104033 
37 013664 012737 oOo0o001 
370 Ol3ere B18737 OOO 
3708 Garo Goaiae 
3710 813708 104034 
3711 1371 104035 
371e 01371le imupat 
3713 Biaete 1 1 
3714 13716 104042 
3715 013720 104043 
rie 
3718 137 012737 
3718 13796 B1e7a9 Dogode 
37gh Biarad 5 1214 
a753 piaes ed 031616 
oe flee Rice 
sree Ol3ree less? 000030 
see fle ieee Hees 
37293 14002 37 2S4 
aad tite 1oug42 
37 Bid 14 393 o02eeS2 
3738 Bi 2 1401 
734 1 104043 
ares Bias anaes 002326 
3738 Bt ioss 134 
3738 014036 005300 
3739 O1404O OO014OE 


MACY11 30(1046) 
Te0 


002346 
002350 


002326 


38: 


1$: 


es: 


GO 


02-DEC-77 10:43 PAGE 7 
READ DATA WITH 1 BIT ECC WORD ERROR 
ERROR d ;CS1 MISCOMPARE 

ERROR Mie ° 

ERROR ° 

ISR R4, DSECTR ;SIMULATE SECTOR PULSE 

JSR RY, ORSYNC ; SIMULATE HE ADE REAMBLE 

ERROR 10 ENTS i ERROR 
ERROR 11 Ae EONTENTS IN ERROR 

ISR RY, DHDCMP ARCH 

ERROR ile’ : BET OK ONTENTS IN ERROR 

ERROR 13 :CS1_IN N ERROR A AFTER SEARCH 

ERROR 14 ?RKOCYL IN ERROR AFTER SEARCH 
$Bfon FE:ORCPSN 68, REND Oi MEA INE 
Eee 8 i651 IN Erwan RETER ReBOING GaP 
ERROR 33 :CS1 ih ERROR BEER READING SYNC 
MOV #1, ECPATX ;LOAD EXPECTED PATTERN 

Roy = BAGRB AE CPOSK = LOAD. ET ATE Bare eae” 
400 + SOMBER DE TO SIMULATE 
ERROR 34 :MR1 IN READ AQING DATA OR ECC 
ERROR 3e sect RROR AFTER RE TA OR ECC 
ERROR 41 ERA fre cig ae pee READ 
ERROR 42 :ERR IN NE Cc PA 
ERROR 43 ?ERR IN ECC POS 
MOV #20, BITCNT ;SET BIT COUNT FOR CORRECTION COUNT 
MOV #S.R0 :SET COUNT FOR ECCPOS PASS THRU 0 
MOV #13672,R1 ‘SET COUNT FOR ECCPOS TO 0 FIRST PASS 
CLR STMPS :CLEAR SWITCH 
JSR C,RDBIT ;GO READ BIT 
JSR PC ECCGEN ;GENERATE ECC 
MOV RKECPT (Re), T.ECPT PAT 
MOV RKECPS(Re),T.ECPS *GET POSITION 

INC ECPOSK ; ITION XPECTED 
MOV CPOSX,E.ECPS ‘eu AND REPORT 
CMP E.ECPT;T.ECPT CHECK IF PATTERN CORRECT 
BEQ 1$ :YES - SKIP 
ERROR 42 

MP E.ECPS, T.ECPS ; CHECK IF POSITION CORRECT 
BEQ os :YES - SKIP 
ERROR 43 

INC BITCNT ;BUMP BIT COUN 
DEC Ri :DE COUNT. T TO PERO IN ECCPOS 
BNE 3$ tNOT YET ZERO - LOOP 
DEC RO :DEC PASS THRU O COUNT 
BEG ug :IF O - SKIP 


SES 0071 


CZR6EBO RK611 DSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 72 SEG 0072 


CZR6EB.P11 02-DEC-77 10:21 T20 READ DATA WITH 1 BIT ECC WORD ERROR 
3740 014042 012737 177777 002350 MOV #-1, ECPOSx ;PRESET EXPECTED POS TO GO TO ZERO 
Oso 0000 MOV #20000,R1 :SET COUNT TO NEXT O IN ECC POS 
372 Bt bed B45594 ™ BR 5§ :GO DO LOOP AGAIN 
oos 4 4S: TST STMPS s TEST aSlt ICH 
ue pt dpes eit ae — BNE S$ + as eonrtie 
3545 814893 BiS5BA BABBAT Hoy BL ORAE: a oa To FAN FER ONE Pass 
374 14074 17ers 002350 MoV i CPOSX TO GO TO O ON NEXT BIT 
35 BIKE Bibra. ONE! Bort BOS aca 
: T : MORE is. T READY 
783 Biss B37 038 2220 i 18h Ra GPTReG a TeiL ReGIaveRs 
3785 014186 te ne . Oosee0 BIS BADYICERR, E.CS1 SET apeAbY AND ERROR 
y 

757 laid 732 002160 002220 CMP T.CS1,£.CS1 i SHECK Ir gsi CORRECT 

528 Blut 40 E58 3 

seo «O14uied doodiO BR 7g 

376 014156 032737 000100 oO02174 6S: BIT mpage a IEF ieee HARD ERROR SET 

7 Bid} B04394 100000 002234 MOV #DCK,E.ER ? EXPECTED ERROR REG 

3764 014174 104045 ERROR 45 

3766 014176 7S: i 
pia 4 : ists” LO SITMR UMITIN OF hw 
3768 ; ATES 18 BIT NPR WRITING OF MEMORY 

37 

+ LEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR 
3778 iS sf “CONTRG LER IN DIAGNOSTIC MODE. TSSUE 6 a READ DATA 
‘ ;* 
3774 1x YLI AD zm Gy es 
: soit” T PULSE 

ae iS 080 HEAbE oa i iste nuLaie a eretse THE WORDS 

3777 1 TTEN PROPERLY IN MEMORY. 

3078 i nchimamlemeen BEL 
7 417) p00 Tel: 
3781 Ot i3a8 BT 9937 oo0012 001234 MOV #10. ,STIMES ;;D0 10. ITERATIONS 

7 014 37 2352 —Ci CLR BSEDES CLEAR BAD SEC DESIRED 
3764 tse bie7ee 950000 ooo000 MOV #CCLR, RKCS1(R2) ‘CLEAR CONTROLLER 

7 4 44 CLR ECCSRC ; CLEAR ECC oSQURCE, 
ao) QISEED SoSRe? onze th BPSHRS ou8 

3788 014230 004437 032230 JSR R4, LOADRK ae * REGIS TEAS” 

ee fas BES 
353 btdsaa ouge se IBUFF i TROCK O ADDRESS IBUFF 

3793 O14e42 177400 -400 ‘WORD COUNT -4 

3794 014244 010021 RDDATA!CFMT ;COMMAND RDDATA! CFMT 


cgneeeo Te. DSKLS CTRL PRTS 
CZR 10:21 


6EB.P Oe-DEC-77 1 

3738 0142e4%—6 004437 031770 
333g 014252 004437 032014 
3739 014eS6 000003 
3800 
38 14260 004437 032274 
3803 014264 437 023334 
3804 014 104004 
ee bie lem 
380 tees 104007 
3303 014300 004437 023316 
3811 014304 O044 023740 
sais Bi3i8 104010 
tf 01431 10401 ‘ 
3815 014314 004437 O24276 
3816 b143e0 10401 
3817 i asss 104013 
s3i8 14324 1040 

20 O14 437 026500 
3851 Basse 104015 
es ties tele 
ei fie ie 
3826 O1434e 012737 O00000 
see, ties thea Beri 
Se Ba 
3830 014364 104034 
3334 11358 hata 
38 14 104036 
3833 014372 104041 
3834 Baer 10404e 
3835 014376 104043 
ey 
3838 014400 0127! 047636 
sBa8 Bia4o9 Bi5701 046632 
3841 014410 012704 o00012 
384e yen 00S037 001236 
sea Giese, Be 
39 Bivd30 bos00s 
3847 014432 021011 
3848 B144a4 0010 
3849 014436 005303 
3850 O1444O 001424 
3851 O1444e oO05205 


MACY 1 30(1046) 
Tel 


002346 
002350 


1S: 
4S: 


Qe-DEC- -77 10:43 PAGE 73 
18 BIT NPR WRITING OF MEMORY 

ISR R4, CLRIBF ;GO CLEAR INPUT BUFFER 

ISR R4, BLDDAT ;G0 BUILD DATA 

3 :PATTERN 3 

ISR R4, GPSTRT ;START THE OPERATION 

JSR RY; DISEEK :SIMULATE IMPLIED SEEK 

ERROR 4Y ;CS1 Fi MISCOMPARE 

ERROR 5 7M . 

ERROR 6 MRE ° 

ERR 7 :MR3 . 

ISR R4,DSECTR ;SIMULATE SECTOR PULSE 

JSR R4, DRSYNC ;SIMULATE HEADER PREAMBLE 

ERROR 10 :MR1 CONTENTS IN ERROR 

ERROR 11 ?CS1 CONTENTS IN ERROR 

ISR RY, DHDCMP ; SIMULATE ADER SEARCH 

ERROR le’ :MR1 CONTENTS ENTS IN ER Scag 

ERROR 13 :CS1_IN ERROR AFTER ARCH 
ERROR 14 ?RKDCYL OR RKDA IN ERROR AFTER SEARCH 
SR R4, DRGPSN ;GO READ GAP 

ERROR 15 ?MR1 IN 

ERROR 16 :CS1 IN RROR i "READING GAP 
RROR is :MR1 IN READI 

ERROR 3 :CS1 IN ERROR NGEADING SYNC 

MOV #0, ECPATX ek T 

MOV aoee ECPOSX it OAD EXPECT POSITION 

JSR DREAD ;60 SIMUL. TA 

60 : R OF TO SIMULATE 

ERROR = :MR1 IN ERROR ADING DATA OR ECC 
RROR 5 >ECC é RE DATA 

ERROR 6 :CS1 ERROR AFT ADING DATA OR ECC 

ERROR 41 :ECC REG INC CT AFTER ECC R 

ERROR 42 :ERR IN ECC PAT CALC. 

ERROR 43 *ERR IN ECC POS COUNT 

MOV #OBUFF , RO ;SET POINTER TO GOOD DATA 

MOV #IBUFF; RI :SET POINTER TO INPUT DATA 

MOV #10. .R4 ;SET ERROR LIMIT COUNT 

CLR SESCAPE ‘CLEAR E CAPE 

CLR STM :CLEAR ERROR REPORT SWITCH 

MOV aug, R3 i3e COMPARE LIM IT 

CLR RS CLEAR WORD COUNTER 

CMP (RO), (RL) MPARE DA DATA 

BNE 2S erp Tt 

DEC R3 tELSE DEC “WORD OeOUNT LIMIT 

BEG S$ :IF O - SKIP TO EXIT 

INC RS :BUMP WORD COUNT 


SEQ 0073 


Ss 


et ae 
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oo0004 
012737 


046632 
177400 
0100e1 


004437 
004437 
000004 


004437 
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MACY11 30(104%6) O2-DEC-77 10:43 PAGE 74 SEQ 0074 
Tel 18 BIT NPR WRITING OF MEMORY 
CMP (RO)+, (R1)+ ;BUMP DATA POINTERS 
BR 1$ +LOOP 
2s: DEC RY :DEC ERROR LIMIT 
BEQ S$ iF o- CRB 
MOV (RO>,$REGO ;GET GOOD WORD FOR REPORT 
MOV (R12 SREG1 :GET BAD WORD 
MOV c,$ sheG EGe :GET WORD NUMBER 
TST STMP7 ;DECIDE WHICH ERROR REPORT TO USE 
; SK IP IF NOT o. 
INC STMP7 :ELSE BUMP STMP 
ERROR 37 j REPORT FIRST ERROR LINE 
BR ug :SKIP 
3S: ERROR 40 ;REPORT ALL OTHER LINES 
BR 4$ > SKIP 
S$: 
:  REKKERRRLEKRRRARAREARARKKAAAAKARARARAARERARERRARRARRRAARARAK RAK KKE 
jt T 22 18 BIT READ DATA WITH NO ERROR 
:H cl AR RK611 CONTROLLER WITH A ASONTROLLER CLEAR. 
1 a CONTROLL R IN D Tacnost Ic SSUE 4A READ DATA 
+ OF, 00 WORD Boe HERD Peron ‘4 ser Oek T ave 
1 AND DRIVE éLEAR moc aeS TOR Oi mur CATE Aa SECTOR PULSE 
: A GOOD HEADER, 400 DATA WORDS, MUEND A 
i vERIEY THAT COMMAND COMPLETES’ WITHOUT GoRROR: 
H + KEKE EKKRKKRKRARERAKKRRKREKRAERRRRAERARRRERERAKARERARRKRAA KAA HAKEH 
+é122: SCOPE 
MOV #1,STIMES ;;00 1 ITERATION 
CLR BSEDES ;CLEAR BAD SEC DESIRED 
MOV #CCLR,RKCSI(R2) :CLEAR CONTROLLER 
CLR EccSRC *CLEAR ECC SOURCE F 2G 
CLR ECCSRC ;CLEAR ECC RCE 
CLR HIBITS *CLEAR HI ORDER BITS 
ISR R4, LOADRK ;LOAD "L" REGISTERS 
0 :CYLINDER O 
“BYTE O :SECTOR O 
‘BYTE O * TRACK O 
IBUFF : BUFFER ADDRESS IBUFF 
-400 :WORD COUN 
RODATA! CFMT SCOMMAND RODATA! CFMT 
ISR R4, CLRIBF ;GO CLEAR INPUT BUFFER 
JSR R4, BLDDAT ;GO BUILD DATA 
4 : PATTERN y 


JSR R4, OPSTRT ;START THE OPERATION 


i 
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CZR6EBO RK611 OSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 75 SEQ 0075 
CZR6EB.P11 02-0EC-77 10:21 Tee 18 BIT READ DATA WITH NO ERROR 
3908 014604 004437 023334 ISR RY, DISEEK ;SIMULATE IMPLIED SEEK 
3303 14610 194004 ERROR 4 :CS1 MISCOMPARE 
id Ol46le 104 ERROR 5 ?MR1 bg 
3931 14614 1040) ERROR é :MRe . 
33! 14616 10400 ERROR :MR3 
3313 014620 004437 023316 ISR R4, DSECTR ;SIMULATE SECTOR PULSE 
3316 014624 004437 023740 ISR R4, DRSYNC ;SIMULATE HEADER PREAMBLE 
391 9 30 10401 ERROR 10 :MR1 CONTENTS IN ERROR 
3318 14632 104011 ERROR 11 *CS1 CONTENTS IN ERROR 
014634 004437 024276 JSR R4, DHDCMP ;SIMULATE HEADER SEARCH 
3921 014640 104012 ERROR 12 ?MR1 CONTENTS IN ERROR 
14642 104013 ERROR 13 :CS1_ IN ERR AFTER SEARCH 
3363 14644 104014 ERROR 14 * RKDCYL RKDA IN ERROR AFTER SEARCH 
3925 014646 004437 026500 JSR R4, DRGPSN ;GO READ GAP AND SYNC 
3326 014652 104015 ERROR 15 ?MR1 IN ERROR READING GAP 
392 O14eS4 104016 ERROR 16 ?CS1 IN ERROR AFTER READING GAP 
3928 014656 104032 ERROR 32 ?MR1 IN ERROR READING SYNC 
3389 014660 104033 ERR 33 :CS1 IN ERROR AFTER READING SYNC 
3931 014662 012737 OD0000 oD02346 MOV #0, ECPATX ;LOAD EXPECT PATTERN 
3932 014670 012737 OO0S066 002350 MOV #5066 , ECPOSX :LOAD EXPECT ITION 
3933 014676 004437 027176 JSR R4, DREAD :GO SI TE DATA READ 
3934 014702 o00400 406 : R TO SI 
3935 014704 104034 ERROR 34 :MR1 IN NG DATA OR ECC 
3a37 OL47iB | LDYDSE ERROR 36 pEC ERROR AFTER READING DATA OR ECC 
3938 Blasts 104041 ERROR 4i sECC aa INCORRECT Artis ECC READ 
3939 014714 104042 ERROR 42 ?ERR IN ECC PAT CALC. 
3340 014716 104043 ERROR 43 ?ERR IN ECC POS COUNT 
334 
3343 014720 012700 003100 MOV #40. #40. ,RO ;SET COUNT TO EMPTY SILO 
3945 014724 012762 OO00440 oD0026 1S: MOV #DMD!MCLK,RKMR1(R2) ;CLOCK CONTROLLER 
014732 G1e766 000040 o00026 MOV #DMD, RKMRI (Re) 
3349 14740 0053 DEC RO ;DEC_COUNT 
3348 0147 001370 BNE 1§ ‘LOOP UNTIL O 
3o¢q 014744 O04 0323 JSR R4, GETREG ;GET 611 REGS 
3951 014750 013737 O0e2 002220 MOV .¢S1,E.CS1 GET EXPECTED CS1 
3952 014756 042737 OO000i BIC #G0,—.CS1 ‘CLEAR GO BIT 
3953 014764 052737 000200 O022c0 BIS #ROY,E.CS1 :SET READY BIT 
3954 014772 023737 OO02160 OOeecO .cS1,£.CS1 :CHECK IF CS1 CORRECT 
3955 O15 001401 BEQ $ *YES - SKIP 
3356 915002 104056 ERROR 56 :"CS1 IN ERROR AFTER READ DATA” 
3958 ¥ PooCCT TTT TTT TT TT TT TT TT Tt tT TT ttt tT tt tist titi ttt titit tttititt 
3353 i BIT READ DATA WITH DCK 
3961 1% CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
3962 1 i PUT CONTROLLER IN DIAGNOSTIC MODE. ISSUE A READ DATA 
3963 % OF 400 WORDS TO AN RKO& IN 24 SECTOR FORMAT, 


LO6 


c O RK611 DSKLS CTRL pRTS MACY11 30( 1046) C-7 :43 =P 76 7 
STREET ett peKhecce 102 PS4 At 4 Rea bata with Bok —_ on 
3964 :# CYLINDER O EA TOR CLOCK T HROUGH § SEEK 
sa PRBS SE ep isl ina al FE fol oo | 
3968 :% VERIEY” i BURST TE RO OF Ore ye oO rGISTER HE ' 
3969 1 FINAL PATTERN AND POSITION. MAKE SURE DATA CHEEK AND | 
370 i CONTROLLER ERROR SETS. | 
age 01 oco004 TO ear =” ecmammmaamay actus caeaaimauncmanaaaaataitie tate Tat | 
3308 p1ebbe 012737 oo00001 001234 "MOV #1,STIMES ;;D0 1 ITERATION | 
4 ? CLR BSEDES :CLEAR BAD SEC DESIRED | 
3377 B1eps¢ B93982 seater oooo00 MOV #CCLR,RKCSI(R2) ; SHEAR ONTROLLER 
3979 015026 005037 002354 CLR HIBITS ;CLEAR HI ORDER 81TS 
3380 01503¢ po4a 37 032230 JSR R4, LOADRK #1, ORD ate REGISTE ERS 
3982 015040 000 -BYTE 0 ST ETOR O 
3383 B15041 909 *BYT 0 : TRACK O 
3ase O1e04d «7 eu00 “500 eS conto 
—& O15046 010021 RDDATA! CFMT ;COMMAND RDDATA! CFMT 
01S0S0 004437 031770 ISR R4, CLRIBF ;GO CLEAR INPUT BUFFER 
3990 015054 004437 032014 JSR R4, BLDDAT ;GO BUILD DATA © 
333} 15060 000007 ? z i Ba TFERN 7 
3993 
3994 015062 012700 000734 MOV ;SET INDEX INTO BUFFER 
3995 015066 012737 906030 050636 MOV in pete 1000 sSTORE ECC WORDS 
39968 015074 012737 5070 050640 MOV 6, OBUFF +1 
3997 015102 012737 O00001 o02e344 MOV ECCERC i$ T SOURC Q_INDICATE ECC IN BUFFER 
3238 915110 7 000100 047636 i 16, F(RO) if Test Ie TE BIT TE. 
4000 015120 052760 OO0100 047636 BIS IDs OBUFF (RO) Lee Set 1BIT 
108 018130 7 000100 047636 1008 Ic 13} 6,OBUFF(RO) ;CLEAR BIT . 
4004 : 
400S 015136 004437 032274 ISR R4, OPSTRT START THE OPERATION 
woe Ble Teg, OS Hilog VDIsEEK —FIMSLEGArenae> Se 
40 151 1040) ERROR 5 
4009 015152 104006 ERROR 6 MRD ° 
4010 015154 104007 ERROR 7 ?MR3 “ 
uOle 015156 004437 023316 JSR R4, DSECTR ;SIMULATE SECTOR PULSE 
4014 O1S1 004437 740 R R4, DRSYNC MULATE ADER PREAMBLE 
4015 Or6ie6 104010 = 2RROR fy’ PARTE FeNGe a ERROR 
4016 15170 104011 ERROR 11 ec] CONTENTS IN ERROR 
4018 015172 004437 024276 JSR RY, DHDCMP ;SIMULATE HEADER SEARCH 
4019 615176 i04Ole ERROR 12 !MR1 CONTENTS IN ERRO 


CZR6EBO RK611 OSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 77 SES 0077 


CZR6EB.P11 O02-DEC-77 10:21 Te3 18 BIT READ DATA WITH DCK 
40. 13699 104013 ERROR 13 CSI IN ERROR AFTER SEARCH 
uOSS 1 104014 ERROR 14 ;RKDCYL OR RKDA IN ERROR AFTER SEARCH 


4023 437 O26500 R R4Y, DRGPSN 
des Siesta Toul paige |p iRYTN ERROR EEOBINE. CAP ap 
apes Bieste 184838 ERRSE 35 he tN ERSE BFORA*BEAS Ec sync 
01S220 012737 oOOOo001 OdO02346 MOV Ht ;LOAD EXPEC PATTERN 

BAaG3s B8S0bR ddess0 HOY BROBREEEPOSX = LOPE Bara READ. 
ADIN EhrOn REAbiNg BRYA'SR ECC 


C ERROR READING 


oo 
nna be te 
dos tase 

— 

oO 
BBO 
DBO 
oo 
DBD 
WW) 
We 


= 

OO 

oun 
O000000 


4 ATA_OR ECC 
4 Bd ERROR af fe Ree seonee Pa Ce READ 
4037 104042 ERROR 42 

4038 104043 ERROR 43 ERR IN EGE bos Sout 

4040 

4041 015256 012737 OO00022 002326 MOV #22, BITCNT ;SET BIT COUNT FOR CORRECTION COUNT 
4 15264 012700 O000 MOV ‘SET COUNT FOR ECCPOS PASS THRU O 
4045 bigs O1e7bL 012672 MOV sice72,Rl ‘SET COUNT FOR ECCPOS TO 0 FIRST PASS 
4 15274 005037 001214 CLR :CLEAR SWITCH 

O46 015300 904737 031616 3S: JSR pc. ROBIT ;G0 REA eEec 

4048 Bt 10 a Bab035 002214 MOV PKEEST Re), T.ECPt T 

“ous 015316 016237 000030 O02el2 nov pxeces (Re), T.ECPS iseT PO TTION 

uger 81238 BAS328 oozese Ay 6s EPOX, E.EcPs Lo Tol Exoee REPORT 

4 15336 37 002254 002214 CMP E.ECPT,T.ECPT HECK IEP PATTERN POORRECT 

405 15344 14 BEQ is 

4054 015346 ERROR 

Hoee o1s35 37 002252 o02212 15S: CHP EgECPS, T.ECPS ge IEP POSITION CORRECT 

405 1 1 O43 ERROR 43 

40S8 O15 005237 002326 2s: INC BITCNT ;BUMP BIT COUNT 

aBee Bless Borat ae Roy Sevens RBQp% Eo°PoS 
4061 015372 005300 DEC RO DEC, PASS THRU 0 COUNT 

4062 015374 001406 BEQ 4s 

4063 015376 012737 177777 o02350 MOV ECPOSX PRESET EXPECTED POS TO GO TO ZERO 
4064 O15404 012701 Od20000 MOV #20600, Ri ; SET COUNT TO NEXT 0 IN ECC POS 
4065 15410 000733 BR :GO DO LOOP AGAIN 

Goe? 015412 005737 001214 4S: TST STMPS ;TEST SWITCH 

4068 015416 i012 BNE S$ ?ALREADY SET - SKIP 

abs Blewse 81878) BUBBCE Roy HORgerR! BEY GRUND RETUAN ae ROHE” acs 
“B74 015430 012737 1erere 002350 MOV zines iBFTLe XP POs TO GO TO O ON NEXT BIT 
4073 12ya8 ait BR GO DO LOOP AGAIN 


4075 O1S444 004737 031616 5S: JSR PC,ROBIT ;ONE MORE BIT TO SET READY 


NO6 


CZR6EBO RK611 DSKLS CTRL PRTS MACYI1 30(1046) O2-DEC-77 10:43 PAGE 78 SEQ 0078 

CZR6EB.P11 02-DEC-77 10:21 T23 18 BIT READ DATA WITH DCK 

4076 0154S0 004437 032356 ISR R4, GETREG ;GET '611 REGISTERS 

407 0154 4 0137 002260 220 MOV L.¢S1.£.CS1 *GET EXPECTED CS1 

1 7 100200 002220 BIS #ROY'CERR,E.CS1 ;SET READY AND ERROR 

40 15470 999001 002220 BIC #GO :CLEAR GO 

4 15476 7 2160 O02220 - CMP T.CS1,E.CS1 *CHECK IF _CS1 CORRECT 

WoBe O1se0e 104049 EROR 94 eee 

083 ptee? 10 BR 7$ 

40Bs 015512 036737 000100 002174 6S: BIT 8ECH, T.ER jTEST IF ECC HARD ERROR SET 

4086 015522 012737 100000 002234 MOV #DCK,E.ER :SET EXPECTED ERROR REG 

i087 015530 i10404S ERROR 4S 

4088 015532 7S: 

4091 H 1 alatanaiaaae es att + an + tama atlatetce 
403e ; ATE BIT READ DATA WITH ECH 

4094 i CLEAR RK61 aac ER ee ro) CONTROLLER CLEAR. 

4095 i PUT CONT LE ISSUE A READ DATA 
4096 i OF 400 WORDS Ney SEC OR FORMAT 

4037 # CYLINDER Sam 0, CLOCK. THROUGH SEE SEEK 

4099 + 8 GQ08 aie ae MBN AND Fcc. INDICATING 
4100 # 2 err VERIFY "BND COUNTIN THE 

4101 + POstT ON Bat are non ke SURE DATE CHECK, Set HARD, 

410¢ i AND CONTROLLER 
ube 015532 oo0004 Hs seeeepessneeeeeeseessnsosoessssssannaunuaaossasssssssssnsssee 
4106 015534 012737 oo0001 001234 “MOV #1,STIMES ;;D0 1 ITERATION 
4108 O15S542 005037 002352 CLR BSEDES ;CLEAR BAD SEC DESIRED 
4108 015546 012762 100000 oo0000 MOV #CCLR,RKCS1(R2) ;CLEAR CONTROLLER 
4111 O1S554 005037 002354 CLR HIBITS ;CLEAR HI ORDER BITS 
4112 pieced 004437 032230 ISR R4, LOADRK *LOAD “L™ REGISTERS 
4113 015564 oO00000 0 :CYLINDER O 
4114 O18 bb 00 -BYT 0 s PEGLOR rs) 
4115 O15 00 *BYT 0 TRACK O 
4116 015570 oO4663e IBUFF :BUFFER ADDRESS IBUFF 
4117 015572 177400 -400 :WORD COUNT -400 
diig 015574 010021 RDDATA! CFMT ;COMMAND RDDATA!CFMT 

digo 015576 04437 031770 JSR R4, CLRIBF ;GO CLEAR INPUT BUFFER 
4122 0156 004437 032014 JSR R4, BLDDAT ;GO BUILD DATA 
digs 0156 oo000s 5 : :PATTERN S 
Gise 
4126 015610 912700 000734 MOV ;SET INDEX INTO BUFFER 
sige Blecis Bird, O91958 BDESS ee EAA ORETTITRA, SE 
4129 015630 012737 O0000i o02344 MOV ceeaRe -SET siunet TO INQICATE ECC IN BUFFER 
4130 015636 042760 OOS000 047636 BIC stTs'a1T11, BUFF (RO) -CREATE 11 BIT BURST ERROR 
4131 015644 052760 OS0100 047636 BIS #B1T6iBITI2! BIT14, OBUFF (RO) 


OSA SoM OSO IM Lee 


OOO000000000 2000 OoOoOO000000 A20000 C000 


eb he 


bb De ae De ae ae ae be Be ae ae Be ae be ae Bs be bene ae be ne ae ae be an a ae en ne be ae an ee be be en en en ee ee te Pane ee he Des ae ee ne fe Bt ne ae ne ae 
uw 
-_ 


SELES ELESCSLEL EEC EEC ECCS EEE CCC CECE CECE ECC EEL EEL ECCS EELS SLICES 


QR RIOR O.3a Now Lon Owe Von fOr Ow UTE 


_——— 


BO RK611 OSKLS Che. PRTS 
-Pll 02-DEC-77 


10:21 


004437 


399 
50 
——W mee 


026500 


Cum fw 


S229 
Ooor 


i 


oo 
= 
fur 


She KESES SINR 2 


ENN 


REN ota wmuwvuw viv 
2 

299999 

see ag 88 


Beg 
Sho 

RNR 

Eas 


3 
2 
ee 


Bie 
Ree 
aedeee 
ie 
Be 


aasar 
areas 
nmewon 
onoon= 
HWre 

<= ese 
OW LOW) 
=—-NUeEN 


MACY11 30( 1046) 
Te4 


002346 
002350 


002326 


E—.ECPS,T.ECPS 
es 


C-77. 10:43 79 SEQ 0079 

READ DATA WITH ECH 

2 aww, 

#BIT1,OBUFF(RO) ;MAKE IT A 12 BIT BURST ERROR 

R4, OPSTRT sSTART THE OPERATION 

R4’ DISEEK ;SIMULATE IMPLIED SEEK 

4 :CS1 MISCOMPARE 

mo 

? :MR3 ° 

R4, DSECTR ;SIMULATE SECTOR PULSE 

R4, DRSYNC ; SIMULAT PREAMBLE 

10 ;MR1 CON ENT N ERROR 

il :CS1 CONTENTS IN ERROR 

4, DHDCMP SIMULAT QOER SEARCH 

ig iRat CON IN SNTENT AFT Ror 

14 ? RKDC PY ER RORDA IN R ERROR A AFTER SEARCH 
perms ee TN ERRO 
i ai 1h bee Gace ow 

33 :CS1 IN RE aN READ ING SYNC 

#1 sL T PATTERN 

teO6E,E ECPOSX iL OAp er ION 

, DREAD GO Mi TA READ pe 

o- 7MR1 IN eDiNg Dat ER ECC 
3e sEC’ ERROR AFTER READ TA OR ECC 
41 >ECC AEG INC CT READING CC READ 
42 :ERR TN Ecc PAT CALC. 

43 ‘ERR IN ECC POS COUNT 

seeygrTONT SET BT FOUN OER SOMEEE SOU 
tizeze, R1 *SET COUNT FOR ECCPOS TO O FIRST PASS 

*CLEAR SWITCH 

PC, RDBIT ;GO READ BIT 
PC’ ECCGEN : GENERATE ECC 
RKECPT (Re), T.ECPT 3GET PATTERN 
RKECPS(Re),T.ECPS *GET POSITION 
SO OOSK.E.ECPS SET COS Aone ake REPORT 
FECT FECT i CHECK IF PATTERN CORRECT 

is YES - SKIP 


CHECK IF POSITION CORRECT 
;YES - SKIP 


SEQ o080 
C-77_ 10:43 PAGE 80 
CZR6EBO RK611 5.STR- RTS = MACYAL SOC LONG) Beato Ohta with Eon 
: as 3 9s Grnon BTTCNT Bee" COUNT. 19" 9 rt. N ECCPOS 
Wigs Olelie ose3? 02326 Se fae DEC cor" Zeng oft 
413) piise HIE 05 TO GO 10 ZERO 
4 BEQ 4$ POSX . se TE f ER POS 
ht nn eee tar 
1 3 ’ 
ig 016144 000733 i pa iG ST SutT 
4198 o1bi4G ooigie : FOV #11041, RI ; pcs FER ONE PASS 
4 161 # 09 mov 11a SET 0 0 ON NEXT BIT 
4 iel@a ot BoouaL Mov #1 ECPOSX iSE1 Exp Pos 
usos Bret i 77777 002350 MOV STMPE ae SWIT 
4202 016164 0127 TAESEA INC $T 60 DO L HaGAIN 
4304 BiEize 16 om ;ONE NORE BIT TO SET READY 
uso¢ SS: JSR PC, ROBIT ‘GET ’611 ECTED Got 
W206 016200 004737 031616 tt, GET * esd! 
Soa bits b13737 Odeee0 002220 Moy tet abaecE cou iSEt Be 
403 Qlesie oss7a? 100 ee Bic re E-CSh. tEKECK $PCS1 CORRECT 
ay Hee Gee ih Bee ie FREE HES 
“sie Ol 001402 ERROR 44 Pepe 
4213 Olbe4%e 104044 BR $ECH,T.ER TEST IF ECC HARD ERRO 
usis Ble? tei Se HOV. @DCKYECH,E.ER :SET EXPECTED ERROR REG 
. =. 
USI? “DIESeE Q1e737 100100 002234 mov. spe 
81g Bieses Toaa4s - 
421 : 
Se AD TESTS 
4382 pone RKSKRALAARAAERARAAARARARARARARARAARALAAKEEE 
4223 ; iL SERENE TTA SECTOR READ 
4ee4 
4256 iy BYIR by BcnoaT MnSbE,  TSSUE_A READ DATA 
4226 ;* pur RKeal & in Se 
ni 334 x Sor Reh SECTOR FORMAT, 
4228 + . Se 
oe f te Sear ae 
ou ¢ CURE ONLY 103 WORDS GOT TRANSFERRED TO MEMORY. 
4233 } * tit RERRRKARRRRE REAR RRARRR RRR RRARARRRAALEEE 
4 ae RKKKRKKAAARRAARRRERARZRAE 
83 p00004 TSTeS: SCOPE a1, STINES 33D0 1 ITERATION 
ua? Dles?0 Ble797 00001 001234 ai CLEAR BRD SEC DESIRED 
4238 as KCS1(R2) ;CLEAR CON 
4240 Oles0e Olz7e¢ 100000 000000 MOV —-#CCLR,R me 
454] 
905037 902344 cLR CUS rs 
ue43 Biesi4 Bos0s7 Bpsaeq 


07 


CZR6EBO RK611 OSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE B1 SEQ 0081 
CZR6EB.P11 02-DEC-77 10:21 Tes PARTIAL SECTOR READ 
4244 O01 437 032230 ISR R4, LOADRK sLOAD “L” REGISTERS 
gSu¢ Bisse 880080 0 : :CYLINDER O 
4 1 . HE © sce. 0 
We42 YT ; K 0 
4 o4 t ‘BUFFER ADDRESS IBUFF 
4249 016332 177675 -103 :WORD COUNT -103 
at 016334 000021 RODATA ?COMMAND RDDATA 
4 016336 004437 031770 JSR R4, CLRIBF ;GO CLEAR INPUT BUFFER 
4254 O01 4 032014 JSR R4, BLDDAT : LD DATA 
458 Bi BB d086 6 y i OO RE AN 6 
425 
42°58 016350 004437 032274 ISR R4, OPSTRT ;START THE OPERATION 
4259 016354 004437 023334 JSR R4; DISEEK :SIMULATE IMPLIED SEEK 
4e60 016369 194004 ERROR 4 :CS1 MISCOMPARE 
4261 Ol 1040 ERROR 5S :MR1 ad 
4262 016364 104006 ERROR § :MR2 on 
4 3 016366 104007 ERROR :MR3 ° 
webs 016370 004437 023316 JSR R4Y,DSECTR ;SIMULATE SECTOR PULSE 
web? 01637" o04437 023740 JSR. Rit, DRSYNC ; SIMULATE HEADER PREAMBLE 
ue 3 Bt eupe 1Bugrt ERROR 11 :CS1 ¢ TENTS iN RROR 
ue? O16404 O03? 024276 JSR Ri, DHCP  SIMULAT eee SEARCH 
485 tated i Bt ERRGR 1§ ital N igs TER SE arcH 
wea 016414 104014 ERROR 14 :RKDCYL OR RKDA IN ERROR AFTER SEARCH 
4276 O16416 004437 O26500 ISR 4, DRGPSN ;GO READ _GAP_AND SYNC 
W599 Oleded {BYDLE ERROR Le Met TN ERROR AFTER READING GAP 
455 Btedse 1Bug48 RR 48 ?MR1 ih ING SYNC 
4280 016430 104033 ERROR 33 :CS1 IN ERROR AFTER READING SYNC 
4 164 12737 oo00000 002346 MOV #0, ECPATX eh PATTERN 
We8 BiENH5 615737 GO4Ob6 002350 HOV #8066 , ECPOSX LOAD EXPECTED POSITION 
s : Y 
See bieacs athe 400 + SOMBER OF TO SIMULAT 
weee O16454 104034 RROR 34 i ORI IN ERROR READING DATA OR ECC 
ne t4 O1ENeG 1Bug3e ERROR 6 rESE ERROR REPO ENE BBING DATA OR ECC 
4289 016462 104041 ERROR 41 *ECC REG INCORRECT AFTER ECC R 
4290 O16464 . 104042 ERROR 42 :ERR IN ECC PAT CALC. 
4231 016466 ° 104043 ROR 43 *ERR IN ECC POS COUNT 
4293 
4294 016470 013700 002164 MOV T.BA,RO ;GET ACTUAL BA 
4295 016474 ibe? 046632 SUB #IBUFF RO :SUB_START VALUE ft) 
W396 016500 gee700 000206 CHP #206, RO i TEST TE COR CT NUM OF WORDS XFER 
4238 916506 012737 O47040 o02224 MOV #IBUFF+206,E.BA ;SET EXPECTED BA 
4299 016514 104046 ERROR 46 :REPORT XFER LENGTH ERROR 


s 


EO? 


CZREEBO. RK611 DSKLS CTRL PRTS MACYIL1 30(1046) D2-DEC-77 10:43 PAGE B82 SEQ o082 
CZR6EB.P11 02-DEC-77 10:21 Tes PARTIAL SECTOR READ 
4300 

4301 O16 8 91270 900014 4S: MOV -SET COUNT TO END OF OPERATION 

4302 O16 1 O440 o0002z6 35: MOV SOMOS MeL RKMR1(R2) ;RUN THE CLOCK 

4303 016530 762 OO0040 o000026 MOV #OMD, RKMRI (Re) 

4304 16536 of DEC Ri ;DEC_THE fount 

4305 16 001 BNE 3s ;LOOP UNTIL ZERO 

a308 16542 004437 032356 1S: ISR R4, GETREG ;GET 611 REGS 

u308 Bieees passa Soo0b! opese0 Bey = ESL. .cS) GET ENCEC TED CS 

4310 016562 052737 000200 O0e220 BIS #RDY.E.CS1 :SET READY BIT 

dail 016570 023737 002160 O02220 che T.csl, —.CS1 ; CHECK IF gsi CORRECT 

4313 G1 6600 104056 ‘- ERROR Sb :"CS1 IN ERROR AFTER READ DATA” 

Ie | 

aai8 3 + RKGKKREEELRKERE ERE S RARE RRR RKARARARRARRERAKEKRAARAAAAKRARARALEE 

4318 jh ST 26 SILO UNLOAD BEFORE HEADER ERROR 

4320 $i CLEAR RK611 CONTROLLER WITH A CONTROLLER. CLEAR. 

4321 1 PUT wSpHORDS 70) IN D TIC MODE. "Pen A READ DATA 

es if Ra ite 10h 6° “EL Facey 

4324 # AND ORI EA T 

325 :% A a Ee: Lehre oar PULSE etc. 

4326 + AFTER ofce nOLA PULSE AND A SECTOR ERROR. 

4327 1 i SURE The SECTOR GETS L D INTO 

4328 i HENDRY BEF ENTIRE AND CONTROLLER ERROR SETS. 

daar 016602 oo0004 is a es 

4 32 016604 (Ci2737 oo0001 001234 “MOV #1,STIMES ;;DO 1 ITERATION 

4338 016612 012762 100000 oD0000 MOV #CCLR, RKCS1(R2) — CONTROLLER 

43 016620 005037 o02352 CLR BSEDES AR BSE DESIRED 

43 016624 0050: 002344 CLR ECCSRC Sten Ec ECC SOURCE 

4338 0166 005037 002354 CLR HIBITS ORDER BITS 

4339 O16634 004437 032230 JSR R4, LOADRK js LOAD = REG ISTERS 

qa4t 01664 — -BYTE O : one 

4342 01664 000 “BYTE O : TRACK O 

4343 O16644 O46632 iBUFF ; BUFFER ADDRESS IBUFF 

4344 O16646 177377 -401 WORD COUNT -401 

4346 016650 RDDATA COMMAND RDDATA 

1347 016652 004437 031770 JSR R4, CLRIBF ;GO CLEAR INPUT BUFFER 

4349 016656 004437 032014 ISR R4, BLDDAT ;GO BUILD DATA 

4350 016662 o00002 2 :PATTERN 2 

4352 

4353 016664 004437 032274 ISR R4, OPSTRT ;START THE OPERATION 

4354 016670 004437 023334 JSR RY, DISEEK :SIMULATE IMPLIED SEEK 

4355 016674 104004 ERROR :CS1 MISCOMPARE 


. 


cenree RK611 OSKLS Cop. Deel 


CZR6EB.P11  O2-DEC- 
see pisses inuage 
1383 Olerae 104007 
1360 016704 004437 
4 16710 437 
4 16714 104010 
4364 016716 104011 
4368 016720 004437 
43e? Bleze4 LoNdle 
4368 16726 104013 
4368 016730 104014 
4 

4371 016732 437 
4372 167 O4015 
4373 O16790 104016 
4374 01674 

4375 O16744 104033 
4377 O16746 012737 
Ware Bleses b1s73r 
4379 016762 437 
4380 O16766 00 
4381 016770 104034 
4382 016772 104035 
4383 O16774 104036 
4384 016776 104041 
4385 017000 1O4O4e 
4386 017002 10404 
4387 

4389 017004 012701 
4390 017010 012762 
4391 017016 012762 
4392 017024 301 
4393 017026 001370 
4395 017030 052737 
4396 

4397 017036 004437 
4398 

4399 017042 004437 
4400 017046 104010 
4401 017080 104011 
4303 017052 904437 
4404 017056 104012 
4405 017060 104013 
4406 017062 000411 
4407 

4408 

4403 

4410 

4411 017064 005037 


023316 
023740 


024276 


026500 


000000 
004066 
027176 


000040 
000440 
000040 
100000 
023316 
023740 


024276 


002352 


MACY11 30( 1046) 
Tet 


002346 
002350 


000026 
000026 


002352 


6S: 


O07 


O02-CEC-77 10:43 PAGE 83 

SILO UNLOAD BEFORE HEADER ERROR SES 0083 
ERROR 5 $ MR1 od 

ERROR 6 MRE ” 

ERROR 7 :MR3 ” 


;SIMULATE SECTOR PULSE 
Ye | HEADER PREAMBLE 


JSR R4, OSECTR 
JSR R4Y, GRSYNC 


ERROR 10 :MR1 TENTS IN N ERROR 
ERROR 11 Cet ENT NTS 
ISR R4, DHDCMP ;SIMULATE HEADER SE 
ERROR 12 sR CON ENT IN ERROR 
ERROR 13 :C ERROR A 
ERROR 14 Gebcye RKDA IN ERROR COFTER SEARCH 
ISR R4, ORGPSN ;GO READ 
ERROR te sat TN ERROR READ BING READING GAP 
’ 

ERROR 32 ORL iN ee READING 
ERR 33 :CS1 IN ERROR ReCrn NGEADING SYNC 
MOV * #0, ECPATX ;LOAD EXPECT PATTERN 
MOV ice ECPOSX >LOAD CTED POSITION e 
JSR R4, DREAD :GO SIMULATE DATA READ 
400 ; R OF TO SIMULATE 
ERROR -” :MR1L IN ERROR READING DATA OR ECC 
ERROR 35 *ECC ERROR READING DATA 
ERROR 36 ?CS1 ERROR AFTER READING DATA OR ECC 

ROR 41 *ECC REG INC CT AFTER ECC READ 
ERROR 4e *ERR IN ECC PAT CALC 

ROR 43 ‘ERR IN ECC POS COUNT 
MOV ;SET COUNT TO END OF SECTOR 
MOV SBF HECK RKMR1(R2) ;RUN THE CLOCK 
MOV #DMD, RKMRI (Re) 
DEC Ri ;DEC_THE COUNT 
BNE 6$ :LOOP UNTIL ZERO 


BIS #BIT15,BSEDES ;SET FOR BAD SECTOR ERROR 
JSR R4Y, DSECTR ; ISSUE SECTOR PULSE 


JSR R4Y, DRSYNC ;READ SYNC 

ERROR 10 ;MR1 CONTENTS IN ERROR 

ERROR 11 ;CS1 CONTENTS IN ERROR 

JSR R4Y, OHDCMP ;D0 HEADER COMPARE WITH BSE ERROR 
ERROR le ;MR1 CONTENTS IN ERROR 

ERROR 13 ;CS1_IN ERROR AFTER SEARCH 

BR 1$ ;EXPECTED RETURN (NO DA INCREMENT) 


IF THIS CODE IS EXECUTED, THE CONTROLLER pip. por INHIBIT 
THE ADDRESS INCREMENT BECAUSE OF THE BSE ERR 


CLR BSEDES ;CLEAR BSE DESIRED SWITCH 


5 try RK611 pat CTRL PRTS 


R6EB.P11 -DEC-77 10:21 
4412 917070 013737 002274 
4413 017076 013737 OO02e2be 
nat bs 017104 104047 

4416 017106 016237 000014 
wiz 017114 032737 o00200 
Sut8 845485 823999 ooo200 
4420 017132 104051 

433 017134 S3 

44 17136 37 032356 
4424 017142 013737 002260 
44 17180 3737 002220 
44 171 14 

4427 017160 104056 

1358 017162 OOO44O 

“ 017164 012701 932320 
wie Gi Boeae Be 

44 17; 1616 
4434 017204 005301 

i3e 017206 001374 

uy 017210 004437 032356 
4438 017214 27 00001 
4439 017 2 737 0200 
4440 017 3737 O02220 
nan 017236 001402 

was BL7508 | OBSHTB 

4445 017244 012737 047632 
444 17 3737 o02e224 
444 17 14 i 

4448 O17 10405. 

Yuu Ss 

4450 017264 

4451 

445o 

44S3 

4454 

ee 

dues 

a4e9 

ued 

4461 

4462 

4463 

4464 

4465 

4466 017264 O00004 

4467 017266 012737 oo0012 


GO? 


MACYi1l 30(1046) O2-DEC-77 10:43 
Te6 SIL 


o02e40 
002226 


002174 
002174 
002234 


002220 
002160 


O0e2e4 
002164 


001234 


PAGE 84 
O UNLOAD BEFORE HEADER ERROR 
MOV L.OCYL,E.DCYL ;SET EXPECTED CYL 


MOV L.DA,E.DA ;SET EXPECTED SEC/T 
ERROR 47 ; UNEXPECTED AOBRESS INCREMENT 
1$: MOV RKER(R2),7T.ER ;GET ERROR REG 


BIT #@SE,T.ER :TEST IF BSE SET 
RBG Fase ,£.ER XE ExPE FED 2 one REG 


ERROR Sl “BSE DID NOT 
BR TST27 G0 TO NEXT TEST 
2s: ISR R4, GETREG ;GET 611 REGS 
MOV L.¢Si,&.CS1 :SET EXPECTED CS1 
CMP E.C51;T.CS1 ;CHECK IF _CS1 OK 
BEQ 3$ :YE SKIP 
ERROR 56 :"CS1_ERROR_AFTER WRITE CHECK” 
BR TST27 >;GO TO NEXT TEST 
3S: MOV #278.#16.,R1 ;SET COUNT TO NEXT ECC FIELD 
cLR PR. T 3 CLEAR PRESENT AND PREVIOUS BITS 
4S: ISR PC, ROBIT ;SIMULATE READ BIT 
DEC R1 :DEC COUNT 
BNE 4§ ‘LOOP UNTIL ZERO 
ISR R4. GETREG ;GET 611 REGS 
BIC #G0,£.CS1 ‘SET UP EXPECTED CS1 
BIS BrOYT CER E.CS1 
CHF Ec T.cS1 ; CHECK If, csi OK 
RROR - 2 R R READ DATA” 
R eon ve 15 RROR, Aree 
7S: MOV e1BUFF +1000, E.BA {SET EXPECTED BA 
MP Es TEST IF BA CORRECT 
EQ $ ty KIP 
ERROR BUS ADDRESS INCORRECT 
SS: 


-SBTTL #®#WRITE CHECK TESTS 


: TTA CTC 
i kTE WRITE CHECK OF 400 WORDS 


+ sli RK611 CONTROLLER WITH A CONTROLLER CLEAR. 

if BO eae SEEDS AC AN REDE TN 26 SECTOR FORMAT, 

H SOE TKDE GO HEAD DB BeCTon B° CL6Gk Ten UGH SEEK’ 

iH AND DRIVE CLEAR ME aoe MULATE SECT OR PULSE, 

7 A GOOD HEADER ago. He aI TE ¢ HECK D, 

i AND A GOOD 32’ Bit EC RARE Ls RRORS S 

U sasenogspgronnenononnsesnsnnssnssessunssssossutvossenanseesen 


#10.,STIMES ;;00 10. ITERATIONS 


SEQ 0084 


CZR6EBO RKG11 OSKLS CTRL PRTS MACYI1 30(1046) O2-DEC-77 10:43 PAGE 8S SES 008s 


CZR6EB.P11 O02-DEC-77 10:21 Te7 WRITE CHECK OF 400 WORDS 
Sib 817803 BREEN BRE ch HLELIS LEAR Ble OETA 
Sieh gizams osha pea ch SERRE LEAR FE SRUREE P+ 
447. 7314 437 e230 JSR R4 , LOADRK ISTERS 


oa ie HH BO 
Ee COUR ca 


4480 
4481 017332 004437 031770 JSR R4, CLRIBF ;GO CLEAR INPUT BUFFER 

185 017338 437 032014 ISR R4, BLDDAT ;GO_ BUILD DATA 

wags ? 4 :PATTERN 4 

44 17344 012700 000400 MOV #400, RO -SET A NI FOR BUFFER SIZE 
Wag? O17 O18? 6632 MOV #IBUFF, RI i2e OF IBUFF 

444 17354 0127 7636 MOV #OBUFF’ R3 :SET ee oF BUFF 

4489 017360 75S: MOV (R3)+, tR1)+ ;MOV PATT O IBUFF 

44 17 DEC RO ?DEC 

4331 017364 001375 75$ :LOOP UNTIL PATTERN IS MOVED 
4493 017 2 COO oo0000 110%: Mov #CCLR RKCS1(R2) ;CLEAR CONTROLLER 

4494 O17374 Basia? 0322 2274 JSR R4, OPS : START $e OPERATION 

4495 017400 4437 3334 JSR RY, ST eeEK :SIMULATE IMPLIED SEEK 

W436 017404 194004 ERROR fal MISCOMPARE 

4498 17418 1B4ObE RROR : MRE » 

4493 17412 104007. ERROR 7 MRS ° 

4e01 017414 004437 023316 JSR R4, DSECTR ;SIMULATE SECTOR PULSE 

4503 017420 004437 023740 JSR . R4, DRSYNC ATE HEADER P 

Es Bizdse Bub? EfRon tf at Sa ih FRESE 

4507 017430 004437 024276 JSR R44, DHOCMP MULATE HERDER SEA SEAR 

qen8 pt ease 134 1 RROR 1§ e 1 $8 ERROR AB ERY OF ac 

4510 017440 104014 ERROR 14 RKOCYL OR RKDA IN ERROR COFTER SEARCH 
451 1744 437 O26S00 ISR R4, DRGPSN 

4815 BiPwe ToNcte Efron i ane RP ERROR READING, CAP, 
dete B17 1 Miki ERROR 48 :MR1 iN ER a ROR REA ING SYNC 

ue16 17454 104033 ERROR 33 :CS1 IN ERROR AFTER READING SYNC 
4518 017456 012737 900000 o02346 MOV #0, ECPATX CTED PATT 

4818 b174 4 2737 304066 002350 MOV #4066, ECPOSX LOAD ENPECTED TED P POSIT THON 

4 17472 4437 027176 JSR RY, DURTCK GO SIMULATE WR CHECK 

4521 017476 OOO400 400 NUMBER OF WOR g TO SIMULATE 
4522 017500 104053 ERROR 53 : Nut IN ERROR WRT CK OR ECC READ 
4523 017502 104054 ERROR 54 :ECC ERROR IN WRITE CHECK OP 


EOE eee 
| 


CZR6EBO RK611 OSKLS CTRL PRTS 
Oe-DEC-77 10:21 


CZR6EB.P1 


017514 


SWS aan 


o 


O0000000 2000 
Giuigigiuw) Glow 


\ 
nd ed ed ed ed ed ee 


NN 
ul 
Nv 
o£ 


NNN 
ee 
£oO te 


et ee 


001401 
1040S7 


oo0004 
012737 


005037 
005037 
004437 
000000 

000 

000 
046632 
177400 
000031 
004437 


004437 
ooo00S 


012700 


000001 
002352 


002354 
032230 


031770 
032014 


000400 


MACY11 30(1046) 
Te? 


ooo0e6 
000026 


001234 


ERROR 
ERROR 


es: 


I0?7 


O2-DEC-77 10:43 PAGE 86 
WRITE CHECK OF 400 WORDS 


ss CS1 ERROR AFTER WRT CHK OR ECC READ 
41 rECC REG INCORRECT AFTER ECC READ 
42 ;ERR IN ECC PAT CALC. 

43 ;ERR IN ECC POS COUNT 

#40. #37. ,RO0 ;SET COUNT TO EMPTY SILO 


#OMD! MCLK RKMRI (R2) ;CLOCK CONTROLLER 
a0MD, ,RKMRICR 


;DEC COUNT 

1§ :LOOP UNTIL O 

R4, GETREG GET 611 REGS 
L.¢Si1,€.CS1 :GET EXPECTED CS1 

#G0,£.CS1 :CLEAR GO BIT 
sROY E.CS1 :SET READY BIT 

T.cS1,£.CS1 ;CHECK IF CS1 CORRECT 
bg :YES - SKIP 
57 :"CS1 IN ERROR AFTER WRITE CHECK” 


aa Ge cae ee 


; ATE WRITE CHECK WITH DCK 
i CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
1a PUT CONT ER N_DIAGNOSTIC MODE SUE AL WRIT 
+ COE COCR CO OHESO US, SECTOR Be CLOCK THROUGH SEEK’ 
:% AND DR ape, Ss. imu aTe a a SECTOR PULSE, 
+ ANB Rego ETT Ce ING A MBURST ERRORS” 
i VERIFY THA ae ties REGIS TER TN TNeRe RENTS. PR PROPERLY 
1a AND T THe FINAL OSIT ARE CORREC 
i CHECK Heat Cheek TERN CONTROLLER TOR ROR ARE SET 
i eneeeey cone eeaeennnenenenenneneenennnnennnnenennenanentates 
"MOV #1,STIMES ;;D0 1 ITERATION 
CLR BSEDES ;CLEAR BAD SECTOR DESIRED 
CLR HIBITS *CLEAR HI ORDER BITS 
ISR R4, LOADRK :LOAD “L"™ REGISTERS 
0 :CYLINDER O 
BYTE oO ; SECTOR O 
BYTE O : TRACK O 
IBUFF ; BUFFER ADDRESS _IBUFF 
-400 ORD C 400 
WRT CHK COMMAND WRTCHK 
JSR R4, CLRIBF ;GO CLEAR INPUT BUFFER 
JSR R4, BLODAT ;GO BUILD DATA 
5 :PATTERN S 
MOV #400, RO ;SET A COUNT FOR BUFFER SIZE 


SEQ 0086 


O? 


CZREEBO RK611 OSKLS CTRL PRTS MACY11 30(104%6) O2-DEC-77 10:43 PAGE 87 SEQ 0087 
Z°SEB.P11 02-DEC-77 10:21 ™30 WRITE CHECK WITH DCK 
4580 017654 0 012701 046632 MOV #IBUFF,RI1 ;SET ADDRESS OF IBUFF 
4581 017660 012703 047636 MOV #OBUFF; R3 :SET ADDRESS OF OBUFF 
4bee oi 7eee Ole 75S: mov (R3)+, tRi)+ ; MOV part RN TO IBUFF 
464 176 001 BNE 75$ ‘LOOP UNTIL PATTERN IS MOVED 
4 1767, 1 001 MOV #106 -SET INDEX INTO BUFFER 
gee? Bie B1s790 Toe 093 050636 MOV Ere oBuFF +1000 sSTORE ECC WORDS 
4588 017704 012737 1510S2 o50640 MOV #161 052? OBUFF +1 
HE Og b17712 737 O01 002344 MOV al ECCS CSAC ;SET SOURCE _TO INDICATE ECC IN BUFFER 
4590 177 760 100 047636 BIT eat 6, OBUFF (RO) TEST TE BIT SET 
882 617730 760 OO0100 047636 BIS #51 6,OBUFF(RO) ;ELSE SET BIT 
4 33 017746 ree 000100 047636 1008: BIC #81T6,OBUFF(RO) ;CLEAR BIT 
45 ‘ 
4597 017746 0127 100000 ooo000 110%: MoV #CCLR,RKCSI(R2) ;CLEAR CONTROLLER 
4598 017754 437 022274 ISR R4, OPSTRT :START THE OPERATION 
eae Blzren biog OM BBfon SOUS EUS otpend> SEX 
wee Blzeee tesate cae mm: 
W603 Bi 38 10400 ERROR 7 :MR ° 
we0s 017774 004437 023316 ISR R4,DSECTR ;SIMULATE SECTOR PULSE 
4607 004437 023740 JSR R4Y, DRSYNC SIMULATE HE R PREAMBLE 
4608 0004 104010 ERROR 10 aan KON TENTS N ERROR 
4608 0006 104011 ERROR 11 :CS1 CONTENTS IN ERROR 
4611 O20010 004437 024276 ISR R4, DHDCMP R SEARCH 
4612 O20014 10401 ERROR 12’ inal ¢ con 
46.3 Oe0016 10401 ERROR 13 ONTENT TERY CF aR 
dela 104014 ERR 14 bout OR RKDA IN ERROR COFTER SEARCH 
W618 020022 004437 O26500 JSR R4, DRGPSN ~ READ GAP GAP AND SYNC op 
4617 Oe 104015 ERROR 15 ?MR1 IN ERROR RE ING GAP 
Wels OB ibdose ERROR 38 iGRL IN ERROR READING SYNC. 
uoe0 0034 104033 ERROR 33 :CS1 IN ERROR TER READING SYNC 
462: 012737 000001 002346 MOV #1, ECPATX sLOAD EXPECTED PATTERN 
ue55 eons 0 6737 OO4066 002350 MOV a tee Bb ECPOSX j LOAD E TED Pos! ON 
4624 bo4 7 027176 JSR :GO SIMULATE WRITE CHEC 
4625 O20056 0400 400 :NUMBER OF WORDS TO SIMULATE 
ge ae a EGE Eaebe"Pn GRE cut ope "EAP 
4628 104055 ERROR 55 rECE ERROR Ab ER UT CHK OR ECC READ 
dees GS00S Baas | cenoe Eee faced Berea ce "=" °° FEM 
W631 BSopee 104043 ERROR 43 *ERR IN ECC POS COUNT 
4633 
4634 020074 012737 o00020 002326 MOV #20, BITCNT ;SET BIT COUNT FOR CORRECTION COUNT 
4635 020102 012700 oo000S MOV #5,R0 :SET COUNT FOR ECCPOS PASS THRU O 


CZR&6EBO RK611 DSKLS CTRL PRTS 
CZR6EB.P1i1 O2-DEC-77 10:21 


4S 01 
sm BBR? 
4G D201 
4699 D201 
4641 psoiss 
Yoy 1 
HEY jag 
evi Geol 
weve Geolee 
ez e0les 
seed 174 
ae50 

YE 

46 

4oSY4 1 
4655 psts 
Se Beh 
ueeg ete 
4660 020230 
4661 020234 
eee e0eae 
ueee 020246 
ees etee4 
4667 

ees O2e0e62 
4670 perses 
4671 hates 
e595 020: 
467: 020314 
4674 O20322 
4675 020324 
4676 020326 
4677 020330 
4678 020336 
46739 O020340 
4680 O20346 
4681 

4682 020350 
4683 

4ES4 

4685 

4686 

4687 

4688 

4689 

4690 


rs) 


[=) 

- 
RON 
SSS88 


om 


8 


Siatsieiste 
ass 


NE 
ay 


2009 fol=) 

RRee Bee 
NON N 
QUoCrG 6 


N 
ros 
o 


13672 
1214 


61 
is 
2350 
2eS4 
o02eS2 


002326 


000100 
100000 


MACY11 30(1046) 
T30 


o02e14 
O002e1e 


o002eSe 
002214 


002212 


002350 


002350 


002220 
002220 
002220 
O00e2e0 


002174 
002234 


3S: 


es: 


4$: 


S$: 


7$: 


Or 


02sec. -77 10:43 PAGE 88 ” SEQ o0gs 
WRITE CHECK WITH DCK 

MOV #13672,R1 ;SET COUNT FOR ECCPOS TO O FIRST PASS 
CLR STMPS :CLEAR SWITCH 

ISR PC, ROBIT B 

JSR PC’ ECCGEN GONERATE bec 

MOV RKECPT (Re), T.EC pict EET PATTERN 

MOV RKECPS(Re),T.ECPS iGET P ITION 

INC POSX ;BUMP_POSITION OB tp CTED 

MOV ECPOSX, E. ECPS SET FOR COMPARE AND REPORT 

CMP ECPT,T.ECPT CHECK IF PATTERN CORRECT 

BEQ :YES - SKIP 

CMP eS “Ecrs, T.ECPS ;CHECK IF POSITION CORRECT 

EQ 2s :YES - SKIP 

ERROR 43 

INC BITCNT ;BUMP BIT COUNT 

DEC Ri :DEC COUNT TO ZERO IN ECCPOS 

BNE 35 :NOT Yer ZERO = LOOP 

DEC RO ?DEC PASS THRU O COUNT 

BEQ 4g :IF O - SKIP 

MOV #1 ECPOSX :PRESET EXPECTED POS TO GO TO ZERO 
MOV 20600, *SET COUNT TO NEXT O IN ECC POS 
BR :GO DO LOOP AGAIN 

TST STMPS ;TEST SWITCH 

BNE S$ ; ALREADY SET - SKIP 

MOV #10016,R1 *SET COUNT TO FINAL POSITION 
MOV :SET RO TO RETURN AFTER ONE PASS 
MOV a-1 ECPOSX :SET EXP POS TO GO TO O ON NEXT BIT 
INC STMPS *BUMP SWITCH 

BR :GO DO LOOP AGAIN 

JSR PC, ¢/ROBIT . ;ONE MORE TO SE SET READY 

JSR GE REG :GET ° 611 8 firs ERS 

MOV * 7a8i CS1 :GET EX cT D CSI 

BIS sADYICERR, E.CS1 ;SET RE AND ERROR 

BIC E.cS1’ > CLEAR O. 

CMP t CS1,€.CS1 :CHECK IF _CS1 CORRECT 

BEQ 6$ :YES - SKIP 
ERROR 4 
BIT 8ECH, T.ER TEST IF eee HARD ERROR SET 
MOV #O0CK,E.ER :SET EXPECTED ERROR REG 
ERROR 45 


presetarsccessenn Saxe tteCmTC 


; ATE 


ee ka 


WRITE CHECK OF 18 BIT WORDS 


CLEAR RK611 ER IN_OIAG WITH A CONTROLLER eae 


PUT CONTROLLER IN 
CK OF oe 


AGNOSTIC wees ISSUE A WRITE 
0 AN RKO& IN 24 SECTOR FORMAT, 


CHE 400 W 
CYLINDER O, HEAD O SECTOR 0. TEL OcK THROUGH SEEK 
AND DRIVE OL EAR MESSAGES. SIMULATE A SECTOR PULSE, 


CZR6EBO RK611 OSKLS CTRL PRIS 
CZR6E8.P11 10:e1 


02-DEC-77 


4 

ae Bs03e2 12737 

ee Peed Seater 
74 

eh ieee 
03 00 


474S 020534 104033 
4747 020536 012737 


000001 001234 


Boe3e4 


031770 
032014 


000400 
046632 
047636 


agooge oooooo 110: MON 


023316 
023740 


024276 


O026S00 


oooo00 002346 


MACY11 3 


011046) O2-DEC-77 10:43 PAGE 89 
T31 WRITE CHECK OF 18 BIT WORDS 
:% A D HEADER, THE 4 WORD 
H ANS A GOOD 32’BIT EC 
+éT oP 
OV #1,STIMES 
LR B 
te BRB 
CLR CCSRC 
JSR 4, LOADRK 
BYTE O 
.BYT C 
IBUF 
-400 
WRT CHK! CFMT 
ISR R4, CLRIBF 
JSR R4, BLDDAT 
MOV 
MOV SIBURES 
MOV SOBUFF’ RA 
75S: mov (R3)+, (R1)+ 
DEC RO 
NE 75S 
sccLR, RK S1(R2) 
SR RY 
JSR RY, ed 
ERR 
ERROR : 
ERROR 
ERROR 
ISR R4, DSECTR 
ISR R4Y, DRSYNC 
ERROR 10 
ERROR 11 
JSR R4, DHDCMP 
ERROR 1 
ERROR 1 
ERROR 14 
ISR R4, DRGPSN 
ERROR 15 
RROR 16 
RROR 32 
ERROR 33 
MOV #0, ECPATX 


SURE NO ERRORS SET.” 


esvanenesnanenueneanententans RRRRRRLEAAAARRLALARLAARAALAAALALREE 


;;00 1 ITERATION 


PEL EGR Ate BENG PEStReO 
fet reac TErs 
Secon O 
TRACK O 
;BUFFER AD ESS IBUFF 
;WORD COUNT -40 

; COMMAND WRTCHK ! CFMT 


;GO CLEAR INPUT BUFFER 
‘Bar PUILD DATA 
SE} A COUNT OF BU BUFFER SIZE 


ROY y PATTERN fo 18 TBUEF 
:LOOP UNTIL PATTERN IS MOVED 


SSYART fae OPERATION 


Gz Hig IMPLIED SEEK 


mm 
;SIMULATE SECTOR PULSE 
pS] AT R PREAMBLE 


AD 
;MR1 C ONTENTS 3 iN ERROR 
;CS1 CONTENTS IN ERROR 


SIMULATE HEADER Sennen 


ine 1 SANERROR ATER Se SEARCH 


RROCYL OR RKDA IN ERROR AFTER SEARCH 


560 READ GAP AND S 
;MR1 IN ERROR g READING GAP 
; N ERROR READING GAP 


N ERROR READING SYNC 
:CS1 IN ERROR AFTER READING SYNC 


;LOAD EXPECTED PATTERN 


SEQ 0089 


CZR6EBO RK611 OSKLS CTRL PRTS 


CZR6EB.P 


_——————— 


020726 


012737 
Pa 
iis 
IRs 


10404e 
104043 


012700 
ec 

7 

3 
001370 
nee 
042737 
sere 
Boi4 1 
104057 


oocoo4 
012737 


004437 
004437 


ll O02-DEC-77 10:21 


OOSO66 
027176 


000001 
002352 
002354 
002344 
032230 


031770 
032014 


MACY11 30(1046) 
T31 


002350 


oo0026 
000026 


O00e2e0 


001234 


MOV #S066 , ECPOSX 


O2-DEC-77 10:43 PAGE 390 
WRITE CHECK OF 18 BIT WORDS 


;LOAD EXPECTED es SER 


286 RY, DWRTCK 560 SIMULATE Ape Tg" a 
ERROR 3 iD i Th, N WRITE CHECK i ogee — 
ERROR aT Eee REC inconRe ct AFTER Siem le 
ERROR 42 N ECC Pi 
OR 43 ERR iN ECC bos COUNT 
MOV #40. #40. ,RO ;SET COUNT TO EMPTY SILO 
1S: MOV #OMD!MCLK,RKMR1(R2) ;CLOCK CONTROLLER 
MOV SOMD, RK RKMRI (Re) 
DEC ;DEC COUNT 
BNE 1S :LOOP UNTIL O 
a8) MeSETBERs, © GET BUA EPR css 
BIC #G0,£.CS1 ;CLEAR, 
BIS #ROY.E.CS1 
CMP T.cSl,&.CS51 Geek ir igs T CORRECT 
BEQ 23 
ERROR 57 :"CS1 IN ERROR AFTER WRITE CHECK” 


PTTTTITTTTITITTTTITTTTTT ITT TTT TTT TT TTT TTT TTT Tt TTT Tee 


i kTEST T 32 


We eC Ce ce 


fee 


$732 
MOV #1,STIMES 


CLR BSEDES 
CLR HIBITS 


ECCSRC 
JSR R4Y, LOADRK 


BYTE Q 
-BYTE O 
IBUFF 
WRTCHK 


JSR R4, CLRIBF 
JSR R4, BLDDAT 


WRITE CHECK OF A PARTIAL SECTOR 
gu AR RK CONTROLLER WITH A CONTROLLER tt 
Toe ee IN AGNOSTIC MODE. TSSUE WRITE 


EVEINER 0; HEAD fo ee Feri” ee 


Mat ae ed WoRd 4 TO BE WRITE CHECKED, "477 WORDS 


nba SSL ne 


CT08 RF fare 


;;D00 1 ITERATION 


;CLEAR BAD SECTOR OESIRED 
sch AR Be Oban BITS 


K 0 
‘BUFFER ADDRESS IBUFF 
;WORD COUNT -1 
;COMMAND WRTCHK 

;GO CLEAR INPUT BUFFER 


;GO BUILD DATA 


SEQ 9090 


i i SS A 


Sites a DOSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 91 SEQ 0091 


02-DEC-77 10:21 T32 WRITE CHECK OF A PARTIAL SECTOR 
4go4 020732 000006 6 ;PATTERN 6 
48 734 O01 o00400 MOV #400, RO ;SET A COUNT FOR BUFFER SIZE 
480 7490 012701 O4663e MOV SIBUFF,R1 :SET ADDRESS OF IBUFF 
48 744 012703 047636 MOV SOBUFF ; R3 :SET ADDRESS OF OBUFF 
4 08 750 Ole3sel 75$: MOV (P3)+, tRi)+ > MOV Part TERN TO IBUFF 
' | 
git psieeg Brave BNE 75S $ DEG COUN UNTIL PATTERN IS MOVED 
4813 020756 012762 00 oo0000 110$: MOV #CCLR,RKCSI(R2) ;CLEAR CONTROLLER 
4814 O74 432 03227 ISR R4, OPSTRT *START THE OPERATION 
4815 07 4437 Oe3334 Is R4; DISEEK :SIMULATE IMPLIED SEEK 
4816 74 104004 ERROR 4 :CS1 MISCOMPARE 
4817 7 104005 ERROR 5S :MR1 S 
4818 1008 04006 ERROR 6 :MRe ° 
ue13 1002 104007 ERROR 7 :MR3 ° 
age 021004 004437 023316 JSR R4,DSECTR ;SIMULATE SECTOR PULSE 
4823 021010 004437 023740 TSR R4, DRSYNC ; SIMULATE HEADER PREAMBLE 
4824 021014 010 cRROR 10 :MR1 CONTENTS IN ERROR 
uses 021016 104011 ERROR 11 :CS1 CONTENTS IN ERROR 
Boo 1020 437 024276 JSR R4, DHDCMP ; SIMULAT HEADER SEA ARCH 
ieee 1024 194012 ERROR le iMRI CON 
1026 104013 ERROR 13 :CS1 N ER AFT ‘* CF aR CH 
4830 021030 104014 ERROR 14 i SebceL DA IN ERROR AFTER SEARCH 
48 021032 004437 O26500 JSR R4, DRGPSN 40 READ GAP AND S 
4833 021036 104015 ERROR 15 ;MR1 IN ERROR RROR READING 
wee Blo ipods ee ial ih beea feccineera 
4836 65 1BuS 1 35 ERROR 32 ICSI 1K RROR ERO INSEAD ING SYNC 
4838 O21046 012737 oO00000 002346 MOV #0, ECPATX ;LOAD B ParTtion 
4839 Qel S54 012737 OO4066 002350 MOV #4 406 ECPOSX LORD Ey Reet 
4840 1pP3 4437 027176 JSR 4, DWRTCK 560 SIMUL. 
4841 O21066 400 >NU 0 CHECK. E 
484, ge1070 104053 ERROR 53 ;MR1 PRROR On ON WRT CK OR ECC READ 
484 2107 ERROR 54 *ECC RROR IN WRITE CHECK OP 
4844 021074 104055 ERROR 55 ?CS1 ERROR AFTER WRT CHK OR ECC READ 
484S 021076 104041 ERROR 41 ‘ECC REG INCORRECT AFTER ECC READ 
4e46 921100 4 ERROR 42 ‘ERR IN ECC PAT CALC. 
ueuZ 1102 104043 ERROR 43 :ERR IN ECC POS COUNT 
4849 
4850 021104 013700 002154 MOV T.BA,RO i GET ACTUAL BA 
4851 Gei119 162700 O46632 SUB #IBUFF, RO :SUB START VALUE OF BA 
ugbe 1114 022700 oo0002 CMP #2, RO ;TE T IE CORRECT NUM OF WORDS XFER 
4853 021120 001404 BEQ 4§ YE SKIP 
4854 Oellee 012737 046634 o0e224 MOV SIBUFF+2,E.BA SET EXPECTED BA 
Wee5 021130 i0404% ERROR 46 :REPORT XFER LENGTH ERROR 
4857 021132 012701 oo0040 4S: MOV #8. * :SET COUNT TO END OF OPERATION 
4858 021136 Ol2e762 OOO44O oD00ee 35: MOV sBaD eC RKMRI(R2) ;RUN CLOCK 
4859 021144 Ole762 OO0040 o000e6 MOV #DMD, RKMRI (Re) 


SSREEECE INS" BEGET BE 


££ 
29980008 
TT ey eye a er 
=e 
Sxsee ae 


he 
orcr 


— 
o 


furor furu 
ee 8 


aa 
RR RERRERR RERRRRRERR RE 
BENE DORN 


be & 
ay 


000004 
01e737 000001 001234 


037 902352 
5037 002354 


004437 032230 
000000 


? 
012737 0001 046632 
000001 O4663e 


1273 77777 «=—047636 
Bier? 621522 001110 


Ole76e 100000 9000000 
004437 032274 





MACY11 —_— 


es: 


fhe ee ee ee ee ee es ee ee es es ees ee es es esas es 


Ur: 
4 
Ww 


1128: 
110$: 


celine ahaa acd 
m 


O2-DEC-77 10:43 


PAGE 92 
WRITE CHECK OF A PARTIAL SECTOR 


DEC R1 
BNE 3$ 

ISR R4, GETREG 
MOV L.451,€.CS1 
BIC #G0,E—.CS1 
BIS #ROY.E.CS1 
Cc T.cCS1,€.CS1 
BEQ 2g 

ERROR 57 


;DEC_ COUN 
;LOOP ONT IL ZERO 


;GET 611 REGS 

;GET prrec tte cSsl 
;CLEAR GO BIT 

:S READY BIT 

i CHECK 38 CS1 CORRECT 


ES “IN ERROR AFTER WRITE CHECK” 


iceqgteeeneanen es eee 
33 WR (PART 1) 


ITE CHECK ERROR 
SLeAR RK611 CONT! ne wit A_CONTROLLER ett 


CONTROLLER IN D 


Sty 8 Rage rat pa 
REPEAT USING FRE, PeBeH oF 7090001. MAKE SURE RITE CHECK ERROR SETS. 


Big ISSUE A WRITE 
ORMAT 


Bo9004 800100 Soeu09 Sao00 


pottaad 000200 
000400 010000 


MOV #1,STIMES ; 


CLR BSEDES 

CLR HIBITS 

CLR ECCSRC ; 

JSR R4, LOADRK ; 
’ 

-BYTE 0 ; 

*BYT 0 

TBUFF 

WRT CHK 

MOV #16. ,RS 

CLR OBUFF 

MOV #1, IBUF 

BIT #6tTO, IBUFF 

BNE Lies 

MOV #-1, OBUFF 

MOV $1108 SLPERR 


MOV #CCLR,RKCS1(R2) 
ISR R4, OPSTRT 


ee SO ae eee 


;D0 1 ITERATION 


;CLEAR BAD SECTOR DESIRED 
;CLEAR HI ORDER BITS 
;CLEAR ECC SOURCE 

LOAD ™ "  rcehbeaton 


TRACK 
;BUEFER R, ADRESS IBUFF 
+ COMMAND WRTCHK 
are paTTeey count 
LGA FIRST a Md 
seit 0 pleat PATTERN 


SHOULD 


OBUFF 


18 
EL 
;SET LOCAL LOOP ON ERROR 


S 
T 
Lom CONTROLLER 


3CL 
;START THE OPERATION 


H SEEK. 
STING OF OoO000. 


PATT TERN BE O 
E “PATTERN SHOULD BE ALL ONES 


SEQ 0092 


‘ 


- 


CZR6EBO RK611 OSKLS cm PRTS MACYI1 30(104%6) O2-DEC-77 10:43 P 93 SEQ 0 
CZR6EB.P11 at 10:21 T33 WRITE CHECK E (PART 1) _ 


431g 02 1 004437 023334 JSR RY, DISEEK ‘SUAAATE IMPLIED SEEK 

Gi fine ieee oe iat re 

491 1 1 RROR 6 :MRe ° 

43e0 021346 104007 ERROR 7 :MR3 ° 

1938 021350 004437 023316 JSR R4, OSECTR ;SIMULATE SECTOR PULSE 

4 1354 437 023740 ISR R4, DRSYNC SIMULAT R PREAMBLE 

4 $5 1320 tata ERROR 10 ONTENTS OF ERROR 

uae6 021362 104011 ERROR 11 dot EONTENTS IN ERROR 

4 1364 37 o242e76 JSR R4, DHDCMP SIMULAT 

1953 O51 Tougig RROR le’ mat K ONT Nts IN ERPOR 

4 1 i0401 RROR 13 ie IN ERROR Ar 

x 4331 021374 104014 ERROR 14 YL OR RKDA IN ERROR’ AFTER SEARCH 
026500 JSR R4, DRGPSN :GO 

oe IE SEE $8loe 2 BLP EMRE coe 

ua3e 85} 1 RROR 48 ; { ih ERRGR REAR NG cy SYNC 

4337 021410 104033 RROR 33 :CS1 IN ERROR AFTER READING SYNC 

dass g21412 012737 000000 002346 MOV #0 ECPATX ;LOAD EXPECTED PATTERN 

vail Oe14e baaass beri. Oees0 Roy RHORE AROS ih RULBTE WRITE cHeG 

4 14 1 H R O SIMULATE 

4943 021434 104053 RR 3 :MR1 IN E ON WRT CK OR ECC READ 

4944 Geis i 4 ERROR 2g sECC a | N WRT TE CHECK OP 

4945 1448 1Gu0se ERROR 5 ?CS1 ERROR AFTER WRT CHK OR ECC READ 

4946 Oel4¥4e 104041 ERROR 41 sECC REG NCORRECT AFTER ECC READ 

4948 BSiuue 1Bdo45 ERROR 45 tERR 1K ger pn pos SUNT 

494 ; 

4950 O214SO 012701 oD0040 MOV #8. #4. RI -SET COUNT 

4 1454 18763 4 0026 1S: MOV 'MCLK,RKMRI(R2) ;RUN CLOCK 

1982 08 1vee Bt rate OOBase MOV ri spn! RKMRI (Re) 

wey Gelare or3ed mes PSbe EN. zene 

4955 

4 474 0 R4, GET! 

4 BS t2a0 8937 5308 002170 ed ace, 1682 iNest ie, WCE SET 

deg ata RTE 002170 001162 ea Sse, $REGO c OR REPORT 

4960 pstet? 6} 737 O46632 001164 MOV IBUFF, SREG1 get 

wee Geless Ybioes Oe ootuee ERon gUrFsSwEG® ESELSMPED. ED TOPE 

4 

aged 021534 104415 2s: SCOP1 ;LOCAL LOOP ON ERROR 

4 153 7 O4 A FF ;SHIFT F NEXT r ST PATTERN 

Gaee 65 1238 00 332 vanes Bes aeu sDES PATTERN C 

gee 0215 001266 BNE 110$ LOOP UNTIL Ace UBATTERNS TESTED 


4970 5 eH Fe He HE HE HE SE HE HE HE HE EH He HE HE HE HE HH He EE HE HE 
4971 i ATEST 34 WRITE CHECK ERROR (PART 2) 


R6EB.P11 


4998 


Sa CengcReeS 
RVD MUDD OUURODBRD 


he ee 


iptetetatettatatas 


WNM-OWVONTU CWE 


fefatetefatatatatatel stata 


ru 


8 
Cure 


wuw 
O00 
fu 
N 


RRC Bone 


Be ERoRESS 


Ae 
2Nd= 


021676 


104011 


4437 
104012 
104013 
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ooo001 


b2166s 


100000 
032274 
023334 


023316 
N23740 


024276 


MACY11 30( 1046) 
T34 


001234 


046632 
046632 


04763 
00111 


ooocco 


22 2 2 2 2 2 2 3 2 2 8 8 8 So 


Laan seme T aot 


+8734: 


112$: 
110$: 


O2-DEC-77 10:43 
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WRITE CHECK ERROR (PART 2) 


CHF CONTROLLER IN TANG Tie 
ei fhote bag 2 ed g 


Se aoe wt 


V #1,STIMES 
CLR BSEDES 
CLR HIBITS 
CLR ECCSRC 
JSR R4, LOADRK 
“BYTE O 
"BYTE 0 
IBUFF 
WATCHK 
MOV #16. ,RS 
CLR oauee 
MOV #177776, IBUFF 
BIT #B1TO, IBUFF 
BOY AL ww F 
MOV $1109 SL PERR 
MOV #CCLR, RKCS1(R2) 
ISR 4, OPSTRT 
JSR R4’ DISEEK 
ERROR 4 
ERROR 5 
ERROR 6 
ERROR 7? 
ISR R4, DSECTR 
ISR RY, DRSYNC 
ERROR 10 
ERROR 11 
ISR R4, DHDCMP 
2BRoR 12’ . 
ERROR 13 


HE FOLLOWING 


157777 


Lee LE me §35555 


;D0 1 ITERATION 
BAD SECTOR _— 


; CLEAR 
CL AR HI ee git 
AR ECC S 


the 8 Rec! SISTERS 
‘Bore “ADRESS IBUFF 


WRT CHK 
a Noe oN eat 
eS - TT ATIE 
EF SELIERSSP Ot Petit 


; CLEAR conTeoLse 
;START T TION 

j SIMULATE IMPLIED SEEK 
3CS1 MISCOMPARE 

inne 


;SIMULATE SECTOR PULSE 


thal CONT eae PREAMBLE 
MR1 CONTENTS IN ERROR 
CS1 CONTENTS IN ERROR 


Paras ERROR 
S1 IN ERROR AFTER SEARCH 


: } OF 177777. 


SEQ 0094 


CZR6EBO RK611 OSKLS cm PRTS MACYI1 30( 1046) etre kce 10:43 PAGE 95 
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B. 
5028 021724 104014 ERROR 14 ;RKDCYL OR RKDA IN ERROR AFTER SEARCH 
17 437 026500 ISR R4, ORGPSN ;GO READ GAP YNC 
5031 Bei? 1ovOis ERROR 15 a Fis i ERROR READING, GAP 
50 1734 104016 ERROR 16 :CS1 IN ERROR AFTER READING GAP 
50 bei? 1 ERROR 32 :MR1 IN ERROR READ NG SYNC 
20 1 1 3 ROR 33 :CS1 IN ERROR AFTER READING SYNC 
5038 021742 012737 900000 902346 MOV #0, ECPATX sL CTED’paTT RN 
2037 1 127 DO4066 + 002350 MOV #4066 , ECPOSX 7L cr ITION 
1 4 027176 JSR R4, DWRTCK ;G0 SI — WRITE CHECK 
2039 1762 1 ;NUMBER OF WORDS TO SIMULATE 
1764 104053 ERR 53 :MR1 IN E ON WRT CK OR ECC READ 
Bout 17 1 4 ERROR 54 *ECC ERROR IN WRITE CHECK OP 
4 17 104055 ERROR 655 :CS1 ERROR AFTER WRT CHK OR ECC READ 
5043 1772 1 ERROR 41 sECC REG INCORRECT AFTER ECC 
S044 geire4 10404e ERROR 42 ;ERR IN ECC PAT CALC. 
504s 1776 1 ERROR 43 ;ERR IN ECC POS COUNT 
eo4s 1 MOV #8. #4. RI -SET COUNT 
5048 Ae ot eet ooo026 1S: MOV Hint y ie RKMR1(R2) ;RUN CLOCK 
5049 Oee0l2 Ole762 O00040 o00026 MOV #OMD, RKMRI (R2) 
Boe) ‘pssuse BOrsvo BNE OCS +6 oP UNTL 
1 13 BNE 1s :LOOP UNTIL ZERO 
ege5 2024 004437 032356 ISR RY GETREG sGET REGS 
2054 22030 32737 040000 002170 BIT ae" .cS2 i TEST IF WCE SET 
S056 Oe 1 os 002170 001162 ey T.CS2, $REGO ; ES G53 FOR REPORT 
5057 Oe 013737 O4663e 001164 MOV IBUFF, $REG1 ; SET D READ 
5058 022054 013737 047636 001166 MOV OBUFF ; SREG2 3 SET WORD FROM BUFFER 
5059 022062 104060 ERROR 60 ;"WCE FAILED TO SET” 
5061 022064 104415 2s: SCOP1 ;LOCAL LOOP ON ERROR 
2oe3 022066 006337 O46632 ASL IBUFF ;SHIFT FOR NEXT TEST PATTERN 
5064 G22072 005537 046632 ADC IBUFF j PUT CARRY BACK IN 
5065 O22076 005305 DEC RS :DEC PATTERN COUNT 
pObG 022100 001264 BNE 110$ :LOOP UNTIL ALL PATTERNS TESTED 
S06 s = RESKKEKRKKSKAARARERRRRAARERAKARRR RARER EERE ERRRRKRKKKHREX 
2088 jh T 35 WRITE CHECK ERROR (PART 3) 
5071 : x CLEAR RK611 a In Ore ER W W THe A ngoee TSeU CLEAR. 
5072 : PUT CONT OLLER A WRITE 
5073 1% CHECK OF z mote Sect 08 RMAT 
5074 :% CYLINDER 4 "HEBD |B CLOCK THROUGH SEEK 
5075 :% AND ORT CLEnR nessAce MULATE A SECTOR PULSE, 
5076 :% A GOOD HEADER, AND ONE WORD “ip DATA CONSISTING 
5077 1 a OF WRITE CHECK 0A ie MAKE SUR 
5078 ; WRITE CHECK ERROR SETS. REPED USING 400000 AS 
2023 is SIMULATED DATA. 
5081 eee terete eee eee ee ee ete eee t ttt ttt ttt ttt t tists ttt titi itee | 
S082 022102 oop0004 +6735: SCOPE 


S083 Oee104 012737 o00001 001234 MOV #1,STIMES ;;00 1 ITERATION 


37? ON ee OSKLS CTRL PRTS 


ZR6EB 
ee eeu 
fe feel 
2090 beet 
ae 
sre ae 
O4 
See 
og eel 
5538 


a ee ee ee ee ae ee te ae ae ee an fe ee en ee be Be be ee 


CUTOUT UT UT a UU 
BOIER LO ODD NON LOO VOU Euro 


pes be te pe sana aned 

2o8 
re See Ss 
Orns <Wwrun §-ON | 


2e 


[=] 

= 
furu 

N 

WwW WwW 
N 
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2352 
e344 
032230 


026500 


ooco00 
OOSO65 
027176 
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002346°* 


002350 


FOS 
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WRITE CHECK ERROR (PART 3) 


CLR BSEDES ;CLEAR BAD SECTOR DESIRED 
CLR ECCSRC :CLEAR ECC SOURCE 
ISR R4, LOADRK :LOAD “L” REGISTERS 
0 ;CYLINDER O 
BYTE O i SECTOR 0 
BYTE O > TRACK O 
F ?BUFFER ADDRESS IBUFF 
=-1 :WORD COUNT -1 
WRTCHK! CFMT ;COMMAND WRTCHK! CFMT 
MOV #40000,HIBITS ;SET HIBITS FOR PATTERN OF 200000 
CLR IBUFF :SET LOW BITS FOR READ 
CLR OBUFF :SET O IN FER 
MOV #110$, SLPERR ;SET LOCAL LOOP ON ERROR 
MOV #CCLR;RKCS1(R2) ;CLEAR CONTROLLER 
MOV #4000, RO ;SET STALL COUNT 
DEC RO :DEC eOUNT 
BNE 4§ :LOOP UNTIL ZERO 
ISR R4, OPSTRT START THE OPERATION 
JSR RY, DISEEK :SIMULATE IMPLIED SEEK 
ERROR 7CS1 MISCOMPARE 
ERROR : :MRI ” 
ERROR 6 :MRe - 
ERROR 7 :MR3 - 
JSR R4, DSECTR ;SIMULATE SECTOR PULSE 
JSR R4, DRSYNC ; SIMULA Te H REAMBLE 
ERROR 10 j MRL CON EN ei in ERROR 
ERROR 11 :CS1 CONTENTS IN 
ISR R4, DHDCMP ; SIMULATE R SE 
ERROR 1 :MR1 CONT Ne R ERROR 
ERROR 1 :CS1 INE TER SEARCH 
ERROR 14 ‘RKDCYL OR RKDA IN ERROR OFTER SEARCH 
JSR R4, DRGPSN ;GO READ GAP_AND SYNC 
ERROR 15 ?MR1 IN ERROR READING GAP 
cee ‘sat IN Enron feapingcernes SP 
ERROR 33 *CS1 IN ERROR RETO ENR ADING SYNC 
MOV #0, ECPATX ;LOAD EXPECTED PATTERN 
MOV #5066 , ECPOSX ;LOAD E cr D ITION 
JSR R4, DWRTCK ;GO SIMULATE WRITE CHECK 
:NUMBER OF WORDS TO SIMULATE 
ERROR 53 :MR1L IN ERROR ON WRT CK OR ECC READ 
ERROR 54 , :ECC ERROR IN WRI TE CHECK OP 
ERROR 55 *CS] ERROR AFTER WRT CHK OR ECC READ 
ERROR 41 gECC REG INCORRECT AFTER ECC READ 
ERROR 4e FERR IN ECC PAT CALC. 
ERROR 43 .}ERR IN ECC POS COUNT 


SEQ 00% 


CZR6EBO RK611 OSKLS CTRL PRTS 
CZR6EB.P11 10:21 


022322 


NPRLONKSSaNTH ERO BD 


a he ae ae be be ee Be be Be be Be Pn ae ne nn ne ae Pe Pe ne be ne be fe 
POH BBo VL Oe Oba VOU Lon Ce wen coe Deote 


CUT UU UT TT UT TT TT TT TT Ut 


be ee ae ae Be te be ae ae ae be ee ae ae ne be ee ee ee 


wo 
uw 


O0e-DEC-77 


p1e7Ok 
1 
1 


oooo04 
012737 


005037 


Hates 
000000 


004437 


000040 


002354 
100000 


000001 
002354 


00235 
03223 


031770 


GO8 
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bobose 


001172 


100000 
002354 


001234 


WRITE CHECK ERROR (PART 35 


MOV #8. #4. T COUNT 
1S: MOV aM! mee rane cha) ;RUN CLOCK 
Dee & omar (RE) OUNT 
BRE is i PES e° UNTIL ZERO 
ISR RY, GETREG ;GET REGS 
BIT ace, T T.cS2 TEST _ T IF WCE SET 
NE I 
MOV r CS2, SREGO ISET CS2 FOR REPORT 
MOV IBUFF, $REG1 :SET WORD READ 
MOV OBUFF ’ SREG2 :SET WORD ofr ott BUFFER 
CLR SREGS :SET UP FOR REPO 
MOV HIBITS, SREGY 
MOV #14. RO 
3S: ROR SREG4 
DEC RO 
BNE 3$ 
ERROR 63 ;"WCE FAILED TO SET” 
2s: SCOP1 ;LOCAL LOOP ON ERROR 
CMP HIBITS, #100000 ;TEST IF SECOND PATTERN DONE 
BEQ S$ :YES - EXIT 
MOV #100000,HIBITS :SET FOR PATTERN 4OO000 
w BR 110$ :LOOP UNTIL ALL PATTERNS TESTED 


Te amma ge gO ee +> cen rnamanraapearert tenance 
T E CHECK ERROR (PART 4) 


Sh AR RK611 IN DIE RW Le A BY LER ett 
let N SSUE A WRITE 
BY KG mene aly FORMAT, 
Toon CLO 


5A RCN HC 


ect DRIVES AR aan ss ATE on OR SEEK 
Ang A GOOD HE DRIVE LEAR S008 WORDS” AND in : ‘ 
SURE WRITE” £5.90 ERROR eer CHEEK WORD COUNT 
AND BOS 
1 iggy °°" camping ROC at te 
#1,STIMES ;;D0 1 ITERATION 
CLR HIBITS ;CLEAR HI BITS 
CLR SEDES ; CLEAR BAD SECTOR DESIRED 
ISR 4, LOADRK *LOAD “L” REGISTERS 
0 :CYLINDER O 
- BYTE rn) ; SECTOR O 
*BYT a) K O 
IBUFF : BUFFER RODRE SS IBUFF 
-400 :WORD COUNT -400 
WRT CHK COMMAND NRTCHI 
ISR R4, CLRIBF :GO CLEAR INPUT BUFFER 


SES 0097 


———LK— SSeS es sess 


HOS 
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CZR6EB.P11 02-DEC-77 10:21 T36 WRITE CHECK ERROR (PART 4) 
5196 022520 004437 032014 JSR R4, BLDDAT ;GO BUILD DATA 
132 O2eSe4 ooo00s S :PATTERN S 
1 Vv #400, RO ; F UFFER SIZE 
a: HP, TN 
1 5 MOV sOBUFF; R3 
peseus BAesbO 75S: MOV (R3)+, (RL)+ ¢ eeu RN TO TBUFE 
de BRE s : L PATTERN IS MOVED 
3 


#530,R0 SET rant INTO BUFFER 


a ne a ere, 


845585 860100 base3e Bty setts, 3 oFF CRO) HFESr Ye etr'Se a 


aE 
+ 


5211 O2e604 001004 
Sk 65 OB 935403 000100 047636 BIS eB Ts, , OBUFF (RO) ter ee “sét 15IT 
4 16 000100 047636 100$: BIC $816, OBUFF (RO) ;CLEAR BIT 
esie 101$: 
2st§ 012762 100000 OO00000 110%: MOV #CCLR, RKCS1(R2) ; CLEAR CONTROLLER 
5218 Oeeb3e 004437 032274 ISR R4, OPSTRT HE OPERATION 
2529 Bseeus Gown 3” 023334 Jer oe RY, DISEEK PAE IMPLIED SEEK 
5221 2644 104005 ERROR 
S222 Oeeb46 104006 ERROR 6 tae - 
Bees 022650 104007 ERROR 7 :MR3 ° 
Bees 022652 004437 023316 ISR R4, DSECTR ;SIMULATE SECTOR PULSE 
S227 022656 004437 023740 JSR Rit, DRSYNC inal eguTeNt HEADER PREAMBLE 
esse Hestes 1Si8ii Eon if Get SSureNre In En 
437 024276 R R4, DHDCMP R H 
ab Bee PET Hifon 3 AMS SH a 
53 2674 104013 ERROR 13 RROR AFTER SE 
peat 022676 104014 ERROR 14 i GeocyL 6A RRA IN ERROR’ AFTER SEARCH 
36 022700 004437 O26500 ISR R4, DRGPSN ;GO READ GAP_AND SYNC 
5237 2704 104015 ERR 1S :MR1 IN ERROR READING GAP 
38 Os 718 1B4038 ERROR 38 at in ERROR DING SYNC _— 
ped 2712 104033 ERROR 32 :CS1 IN Ree R READING SYNC 
S242 022714 012737 oO0000 002346 MOV #0, ECPATX ;LOAD EXPECTED PATTERN 
5243 Oee7ee 012737 OO4O66 002350 MOV a 4066, ECPOSx +LOAD EXPECTED POSITION 
eeid 27 pO4437 027176 JSR 4, DWRTCK :GO ATE WR TE CHECK 
45 27 310 310 + SOMBER O SIMULATE 
sis Gerag tiuoe toe §2 EGE Eheon"Gn GAH cage gb EMO 
: 2 OSS oy 104055 ERROR §5 rECE ERROR AFTER WRT CHK OR ECC READ 
20 Geena ious cee ‘Eas ingit per cae 
5251 Oee7S0 104043 ERROR 43 tERR IN ECC POS COUNT 





SeReRaa UE 


RSAC 
UU AED frou 


tata 
NY 


att ttt 
[a “) “I 
_ oo wW 


forony 
= Owe Vous 


BO _RK611 DSKLS C 
Pil - 


RARAR 
SRE 


S 


BRERES 


Oe-DEC 


177655 
002162 
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es: 


3$: 


4S: 


O2-DEC-77 


108 


10:43 PAG 3 SES 0099 


WRITE CHECK ERROR (PAR 


MOV 
MOV 


#4. #4. T COUNT TO END OF OPERATION 
SOMD SAL RMR AES ;RUN CLOCK 

#0MD, RKMRI (Re) 

Ri ;DEC_COUNT 

1$ :LOOP UNTIL ZERO 

R4, GETREG ;GET_’611 REGS 

awte ,T.CS2 ;TEST ¢ 1 URITE CHECK SET 
2s :YES - SKIP 

T.cS2 SRE ; FOR REPORT 
IBUFFIRO),SREG1 ;BUFFER_WORD 

OBUFF (RO); SREG2 j SIMULATED WORD 

60 j HCE NOT SET ERROR 

4$ ;EXIT 

#IBUFF+2,E.BA ;SET UP EXPECTED BA 
RO,E£.BA :ADD IN THE E NUMBER OF WORDS TO THE ERROR 
£.BA,T.BA *CHECK IF CORREC 

3$ :YES - SKIP 

61 :BUS ADDRESS ERROR 

4§ :EXIT 

#-123,£.WC ;SET EXPECTED WORD COUNT 
T.WC,E.WC :CHECK IF CORRECT 

4g :YES - SKIP 

62 :WORD COUNT ERROR 


3 et hei DSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 100 SES 0100 


02-DEC-77 10:21 END OF PASS ROUTINE 
283 .SBTTL END OF PASS ROUTINE 
asee $ ELINGRENENT THE -PRSE NUMGER (SPS coe Last REPORT 
pe87 HETYEE END PAs Ss WxxXIX TOTAL NU beCinAL NOneERS SINCE LAST REPORT YYYYY” 
Sang :#IF PhERES A a RONTTUR G9 
5290 :%IF THERE ISN’T JUMP TO NEMPAS 
52 023106 SEOP: 
5293 023106 SCOPE 
3110 037 001102 CLR STSTNM ;;ZERO THE TEST NUMBER 
3130 boees7 oblsee the = SpASS: + RO EMENT THE Pass NUMBER 
5297 Ge3ie4 2737 100000 o01256 BIC #100000,SPASS ;;DON’T ALLOW 
5298 1 327 DEC (PC)+ ; ; LOOP? 
1 SEOPCT: .WORD i 
1 BGT DOAGN 3; YES 
5301 1 12737 MOV (PC) +, a(PC)+ +:RESTORE COUNTER 
230e 023142 SENDCT: .WORD 1 
023144 023134 $EOPCT 
5304 Ge3146 104401 023154 TYPE bss j;TYPE ASCIZ STRING 
2306 me _ ii g5s: -ASCIZ <12><15>/END PASS’ #7 
5308 BS3155 013746 001256 ; MOV SPASS,-(SP) ; i SAVE spass FOR TYPEOUT 
2319 pS 350 04401 023206 TPE 67S frees cig stainc, cricndinccigs 
e312 023204 boo BR 66S HH over ASCIZ 
3313 we ij878: “ASCIZ 7 TOTAL ERRORS dine LAST REPORT 7 
Bsis 3525 01374 001112 ; MOV SERTTL,-(SP) AVE SERTT ar oP OR TYPEQUT 
5317 oO23254 10440S TYPDS $19 T A RAL eRccrT WITH SIGN 
2318 Ge3256 401 001245 TYPE SCRLF i} TYPE. CAR RETURN, LINE FEED 
531 Ootiie CLR $ERTTL 3 #CLE ERROR TOTAL 
5320 O23266 013700 OO SGET42: MOV ae42, RO ::GE TTOR ADDRES 
2355 peasr4 os ee, soe i BREOR THE WORLD 
5323 023276 710 SENDAD: JSR PC, (RO) ::G0 TO MONITOR 
ease OS 000240 NOP bi Bgye ROOM 
3368 23308 000240 NOP >:ACTLL 
32 306 SDOAGN: 
6328 023306 000137 IMP a(PC)+ ; ; RETURN 
5329 023310 003364 SRTNAD: .WORD NEWPAS 
2330 023312 eitk 377 000 SENULL: BYTE -1,-1,0 ;;NULL CHARACTER STRING 
5332 ; 
5333 .SBTTL DIAGNOSTIC MODE SECTOR PULSE 
5334 : THE SECTOR PULSE Is PROVIDED BY THIS ROUTINE 
5335 023316 012762 000140 oo0026 OSECTR: MOV #OMD! NSP, RKMRI (Re) -SET SECTOR PULE 
5336 023324 Ole762 OO0040 o00026 MOV BOND, * EMAL CRED ;RESET SECTOR PULSE 
5337 023332 o00204 RTS 


CZREEBO RK 11 OSKLS CTRL PRTS MACYI1 30(1046) O2-DEC-77 10:43 PAGE 101 SEQ 0101 
C€ZREEB.P O2-DEC-77 10:21 DIAGNOSTIC MODE IMPLIED SEEK 

5339 .SBTTL DIAGNOSTIC MODE IMPLIED SEEK 

5340 % He CONTROLLER 1s CLOCKE THROUGH THE SEEK MESSAGES 

5341 + GETTING STA US, AND LE ING THE DRIVE. SINCE THIS REQUIRES A 

ese 3% OIEFEREN OUNT FOR WRITE bATAB AND 0 RE TA/WRITE CHECK 

534  & HE ROUTI LOOK OOKS AT T COPMAND 

PERE * STARTED (L.CS1) AND SETS THE Crock COUNT ACCORDINGLY. 

5346 x AT THE END OF THE IMPLIED SEEK THE CONTENTS OF CS1 MR2 
347 1% AND CHECK KE TO VERIFY THE OPERATION. ALL BtSCREPENCTES 
348 1 i REPORTED IN THE ORDER LISTED. 

5349 :% 

5350 1a CALL: 

5351 + ISR R4, DISEEK 

5352 1 ERROR 4 3CS1 MISCOMPARE ERR 

5353 te ERROR 5 *MR1 MISCOMPARE ERROR 

5354 ta ERROR 6 !MR2 MISCOMPARE ERROR 
355 1% ERROR 7 :MR3 MISCOMPARE ERRON 

5357 023334 DISEEK: 

5358 Oe23334 O1004% MOV RO,-(SP) ;;PUSH RO ON STAC 

5359 023336 010346 MOV R3/-(5P) ::PUSH R3 ON N Stack 

5 023340 032737 oO00002 o02260 BIT #BiT1,L.cS1 CHECK IF WRITE DATA 

536 901003 BNE 10$ :YES - SKIP 

5 12700 000316 MOV #51. *4+2,R0 :SET COUNT FOR READ OR WRITE CHECK 

000412 BR 1S 


; COUNT FOR CLOee THROUGH SILO LOAD 
37 MODE 


2 004612 10S: MOV #66. #37. ,RO 
038737 010000 002260 BIT #CFMT,L.¢S1 EST IF 22 SECTOR 
pe 


4 
5365 oenaes ; 
536 1 BEQ 11$ NO 

aure 12700 o0s222 MOV #66. *41. RO ; 
pasate 


SKIP 
Os OR 18 BIT WORDS 

2383 000016 11S: ADD #4#3+2, RO Shit IFT EGISTER LOAD 
5371 O23402 012762 oO044O oO000ee 1S: Moy #OMD! MCLK memsenes - SET CLOCK 
53 023410 Ole oo0040 o000e6 MOV #OMD, RKMRI (R2) sCLEDR ughock 
537 Ge3416 DEC RO UNTIL RO IS ZERO 
237d 0013 BNE 1s 
53 O2e3422 O01 002 MOV L.OCYL,R3 ;GET D CYLINDER. 
33 besies Boag? 032444 JSR RY, FSBLVV BEY ERSE_ORDER OF 

78 103 002246 R3.E.MRe STO poaRE 
5379 Oe34 113703 002267 MOVB L.OT.R3 ;GET DESTRED tee ho 
5380 344 177400 BIC #177400,R3 CLEAR 
5381 00 MOV #5, RO ig SHIF 
5382 00630 1S$: ASL R3 : SHIFT OR ey ALIGNMENT 
5383 O23454 005300 DEC RO ;DEC COUNT 
5384 023456 001375 BNE 15S * LOOP UNTIL. ZERO 
5385 Oe 1537 002266 BISB L.0S,R3 : INSERT SECTOR NUMBER 
5386 4 03273 010000 002260 BIT aCFMT,L.CS1 sigST a 8 BIT MODE 
5388 3474 052703 001000 BIS seIT9 R3 *ELSE SE FORMAT BIT IN HOR WRD 
5389 437 032444 16S: JSR FSALVV :REVERSE BIT 
2330 023504 010337 O022s0 MOV Ra’ ES MR3 ?STORE AS EXPECTED MR3 
5392 023510 013737 o02260 o02220 MOV L.CS1,£.CS1 GET EXPECTED CS1 
5393 023516 012737 O2e040 02244 MOV BOM? ECCH!MEWD, EM -SET UP EXPECTED MR1 
5394 023524 004437 032356 JSR R4, GETREG GET RK REGS 





542 OY eae OSKLS cm. PRTS 


Oe-DEC-77 10:21 
$395 
Sw RRR onelso 

4 3540 01273? 023562 
360 023546 032777 001000 
eles 023554 001056 

S403 023555 O10446 

S404 O0e3560 000204 

a 

Sit BIE BEEZE cncow 
$408 Oe3572 001410 

2093 001000 
41 O04 

S411 012737 023614 
et Oe3612 000761 

414 023614 7 

2uie De ele 093737 002246 
avis 001410 

cil Bess etoee cto 
S419 012737 023646 
S420 023644 000744 

eisi > 
£5; BEY GLE ces 
S4e4 1414 
ayer 023665 01011 001000 
4 7 
gis Baers are 0227 
4 2777 001000 
St eR Sater 

at 4 nese 18 00S724 9 

RE a se 
S435 023720 012600 
Bias Oe37ee 000204 
S4 3724 005037 001236 
S43 3730 OQle706 001100 
S440 023734 000177 155150 
S441 
S44. 

S44 

S444 

S44s 

S446 

S447 

S448 

S449 
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002220 
001236 
155364 


o02204 
1$5336 
001236 


002206 
155304 
001236 


002210 
15SeSe 
001236 


155232 


30(1046) O2-DEC-77 10:43 PAGE 102 
DIAGNOSTIC MODE IMPLIED SEEK 
CMP T.CS1,E.CS1 ; CHECK gst 
EQ : OK - SKIP 
MOV #2$ , SESCAPE ;SET ESCAPE TO RETURN FOR 
: REMAIN ING Test Sy 
BIT #@1T9, aSWR ?CHECK IF LO ERROR 
BNE ag :YES - SKIP 
4S: MOV RY, -(SP) ;SET STACK FOR RETURN TO SUB-ROUTINE 
RTS RY 
: TST R4)+ TO NEXT ERROR CALL 
- CaP bRMRL, T.MRL i GHECK MR1 
BEQ 3$ SKIP 
BIT aG1TS, SUR :SHEOK IE F 1b0P ON ERROR 
HOV 825, SESCAPE :SET ESCAPE FOR RETURN TO SUB-ROUTINE 
3$: TST (R4)+ ; SAME OPERATION AS ABOVE TO 
Chr E.MR2,T.MR2 : CHECK 
BIT #681T9, ISWR 
BNE 
MOV #5$, SESCAPE 
BR 4§ 
S$: TST (R4)+ ; SAME OPERATION AS ABOVE TO 
chr E.MR3,T.MR3 :CHECK MR3 
BIT #8179, ISWR 
BNE 9 
MOV #6S, SESCAPE 
BR 4§ 
6S: IT #B1T9, aSWR ;CHECK JF LOOP ON ERROR 
NE 58 ‘ opeck drrb 
gs: TsT (R424 BURP TO NO. ERROR RETURN 
; MOV aie CEE RR. Eno R3 
MOV (SP)+;RO ; ;POP erAck INTO RO 
RTS 4 
7$: CLR SESCAPE ;CLEAR ESCAP 
MOV #STACK, SP ?CLEAN OFF STACK 
IMP JSLPERR *GO TO LOOP START 
.SBTT TAGNO TIC M READ SYNC PATTERN (PREAM 
ty . One 2 S'36. bts BRD iT I* BIT ARE C ere eKED t THROUTH THE READ. 
* THE ERT ENTS OF MR1 ARE HON ITORED TO WATCH FOR AN ERROR. 
$x AT THE END OF THE SYNC READ, CS1 IS CHECKED TO INSURE IT 
i DID NOT GET CHANGED. 
:% CALL: 
1% $oR RY, DRSYNC 
1a ERROR 10’ ;MR1 CONTENTS IN ERROR 


SES 0102 
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CZR6EB.P11 02-DEC-77 10:21 DIAGNOSTIC MODE READ SYNC PATTERN (PREAMBLE) 
S451 : ERROR il ;CS1 CONTENTS IN ERROR 
5453 1 i IF AN ERROR 1S DETECTED, THE SUBROUTINE WILL SET UP TO ABORT 
e i THE PRESENT TEST UNLESS LOOP ON ERROR IS SET. 
4 DRSYNC: 
4 853545 010046 MoV RO, -(SP) :PUSH RO ON STACK 


CLR ton FAL T COUNT 
ore cLR if FAS PLLAgeY 
MOV #1 35° S COUNT TO CLOCK TO READ GATE 


posh 
46 2 CLR BR. it CLEAR BR PRESENT BIT 
CLR {CLEAR PREVIOUS B17 
4 cee OL oo2244 MOV MEMD!ECCH,E'MRI sSET UP EXPECTED MRI 


4 
46S 3774 7 3161 3S: JSR ;GO_READ A BIT 
466 tae pOneas Baaete 002204 MOV ve T.MRI1 4-3! MR1 
5467 O24006 023737 O02204 o02e44 CMP T.MR1,E.MRI CHECK IF IT IS CORRECT 
4 024014 O01424 BEQ Fx} YES - SKIP 
nae 024016 012737 O2e4066 001236 MOV #2$, SESCAPE ,se ESCAPE FOR CONTINUE TEST 
547 peuge4 905037 001236 4S: CLR SESCAPE ;CLEAR ESCAPE 
473 30 036777 001000 155102 BIT aB1T9, , JSWR Coa IF LOOP ON ERROR 
478 2 3700 001254 nov STESTN, RO tELSE SET UP TO SKIP TO NEXT TEST 
4 0 7 3472 1236 MOV A WOSTB(RO), SESCAPE 
24 oS 4 Te S935 8 0002 Bbi53e - SUB $3 nes APE 
5480 024062 2600 ‘ MOV (SP)+,RO ::POP STACK INTO RO 
B48 024064 pas8p4 RTS — e 
4 O24066 005237 002326 2S: INC BITCNT ; INCREMENT THE BIT COUNT 
484 024072 309 DEC RO :LOOP UNTIL READY FOR READ GATE 
se 024074 133 BNE 3 
4 024076 012700 000177 MOV #127 COUNT FOR REST OF SYNC 
eee 024102 012737 122040 oo2e44 MOV 1 ee MELOLECCWIROGATE E -MR1 ;SET NEW EXPECTED MR1 
4 110 S$: JSR :GO READ BIT 
2uae ey a nea 002204 MOV PeHRT The T.MR1 ; Re 
24 beige 14 002204 oo2244 MP T.MR1,E.MRL i CHECK F CORRECT 
4 41 4 EQ § > YE KI 
Sv34 Ge¥132 018737 024142 001236 Mov #63, SESCAPE :SET FOR CONTINUE TESTING 
eae Bede b08e9? seers = Thc Nd Boe "arr e6 UNTER FOR SYNC 1 
e138 024150 001357 BNE S$ 
41 1 002320 002322 MOV PR.BIT,M1.BIT ;MOV PRESENT 9 PREVIOUS 
a estas 613335 watery 002320 MOV WI PR BIT ;SET SYNC 1 BIT 
5502 024166 4737 031616 JSR PC’ RDBIT ;G0_READ ait 
2203 beulze 016237 000026 002204 MOV RKMR1 (Re), T. MRI 
42 7 22 002244 CMP T.MR1,E.MR1 CHECK IF CORRECT 
5505 O24206 001404 BEQ 7$ :YES - SKIP 


: scanshesieesaaiaaneienns vitdinmbiianns<anah ite tetgaoelianitanaaiek © it dee 1eaaaaeanapemetniainmtiaaepdertmentnsadnemanineiamnll 
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CZR6EBO RK611 ODSKLS CTRL PRTS MACYJ1 30(1046) O2-DEC-77 10:43 PAGE 104 SEQ 0104 
CZ2R6EB.P11 02-DEC-77 10:21 DIAGNOSTIC MODE READ SYNC PATTERN (PREAMBLE) 
5507 10 012737 O24220 001236 MOV 87%, SESCAPE :SET RETURN FOR CONTINUE TEST 
2508 O54 16 pae4i6 BR Sos’ :GO TO ERROR EXIT 
510 4 7$: ISR R4, GETREG ;G0 ez 1 REGISTERS 
eet Deusen pee a35 B35336 INC BITCNT :BUMP BIT atti iad 
eet aes 13957 002260 002220 nov (Peet cS1 ; Bus E 19 Ne CTE CFD b Renn — 
6514 de4e4 3737 O02160 002220 CMP T.CS1,£.CS1 tGheck IF 
pels Oe4246 001266 _ BNE 4g :NO - SKIP 
5517 oOe4e50 005724 TST (R4)+ ;BUMP TO NO ERROR RETURN 
3ei8 Oe4252 000703 1S :SKIP TO Ri 
2oe0 254 932777 001000 1S4656 SOS: BIT #8179, SHR TEST ST IF LOOP ON ERROR 
poce Deueed 005037 001236 CLR SESCAPE ‘CLEAR FOR SKIP TO NEXT TEST 
5524 pSusoe 010446 51S: MOV RY, -(SP) ;SET UP STACK FOR RETURN 
peee 000204 TS RY 
5527 .SBTTL DIAGNOSTIC MODE HEADER READ AND COMPARE 
5528 ; THIS ROUTI eid THE THREE HEADER WORDS READ AND 
2ee9 iH ARE THA PART OF ALL DATA TRANSFER OPERATIONS. 
5531 :% INDER, TRACK 
Bese i Ano SEC Exe Ton sPECi PIED He vot REGISTERS Ge SNE “ett READING OF tHE 
5534 iH Not C ogre THES a THE CONTENTS 
6535 $x OF eat CHECK 0 ARO ed iene DCYL SRD EDA Is 
5536 1% VERIF D. IF THE INCREMENT THE “L* REGISTERS ARE 
2235 + SOP RATTONS. TH rot Te c Sor p otRe OF BCD ES)  SHITCH 
5533 +H is itt ang Te is Sieh ease Ae AND HEADER 
5540 1% 0 BSEDES CONTENTS. THIS 
poi i ON BE ASeED TO HONE oR CE COEROER YPE ERROR. 
ES4 ;% CALL: 
5544 $ ISR R4, DHDCMP r 
554s 1% ERROR 12 ;ERROR IN MR1 
5546  & ERROR 13 ?ERROR IN CS1 P 
pouz 1 i ERROR 14 tERROR IN PACK ADDRESS 
5549 024276 DHDCMP: 
5550 024276 010046 MOV RO, -(SP) ;;PUSH RO ON STACK 
5551 O24 010146 MOV R1,-(SP) +?PUSH R1 ON STACK. 
55 4302 O10346 MOV R3,-(5P) >:PUSH R3 ON STACK 
555. 304 010546 MOV RS.-(SP) ::PUSH RS ON STAC 
5554 306 005037 002326 CLR BITCNT CLE git COUNTER 
5555 dex le 012700 000005 MOV #5, RO ;SET A SHIFT COUNT 
55 16 113701 002267 MOVB L.OT,R1 *GEi DESIRED TRAC 
pa O2e4322 042701 177400 BIC #177400, R1 ‘CLEAR UNUSED Bits 
5559 3 006301 1S: ASL Rl ;SHIFT TRACK TO ALIGN TO 
5560 ate 005300 DEC RO :HEADER WORD FORMAT 
5561 024332 001375 BNE 1$ 





CZR6EBO RKG11 OSKLS CTRL PRTS MACY11 30(104%6) O02-DEC-77 :43 PAGE 105 SEQ 
CZR6EB.P11 02-DEC-77 10:21 DIAGNOSTIC MODE ceapeR READ AND COMPARE = 
563 BISB L.OS,R1 s INSERT DESIRED SECTOR 
564 BIS #6ITIS'eIT14,R1 ;SET BS BITS 
56S MOV L.OCYL,RO ?GET DESIRED CYLINDER 
5566 002263 BIT SCFMT,L.CS1 :TEST IF 22 SECTOR FORMAT 
2 BEQ 2s :NO_- SKIP 
BIS #B1T9,R1 sELSE SET FORMAT BIT 
5 2S: MOV RO,R3 ‘COMPUTE VRC 
55 MOV R1,RS 
557 BIC RO, RS 
22 BIC R1;R3 
7 BIS RS‘R3 
5574 TST BSEDES ;TEST IF BSE DESIRED 
2278 BEQ ess :NO_- SKIP 
578 BIC SEDES, R1 :CLEAR BIT IN WORD 2 
55 BIC BSEDES;R3 :CORRECT HVRC 
eece 235: 
BEBO ; RO, Rl, AND 23 HAVE THE EXPECTED HEADERS 
sees 024414 3 001204 CLR STMP1 ;CLEAR_A PASS COUNTER 
2 O24420 012737 leeo4o oo22e44 MOV #DMD!MEWD!ECCW!ROGATE,E.MR1 ;SET EXPECTED MRI 
2epe 1 000001 11S: MOV #8ITO,RS sESTABLISH BEGINNING OF DATA WORD 
3586 4 pisses 320 002322 75: MOV PR.BIt,M1.BIT i EF One LSM tat BIT 
282 9050 320 CLR PR.BIT ?PRESET FOR PRESENT BIT O 
5 BIT RS, RO :TEST IF BIT TO BE A ONE 
5 14 BEQ 3$ :NO - SKI 
55 002320 MOV #81TO,PR.BIT 7EL TO ONE 
5591 ? 1616 3S: JSR PC, RDBIT :GO READ A BIT 
2235 Oibe 002204 MOV RKMRi(R2),T.MR1 ;GET MRI FOR TESTING 
2ed3 20 bea? 204 Oo02244 che T MRL, E.MRL i CHECK IF ORRECT 
5595 12737 024562 001236 MOV #6$, SESCAPE i <EF RETURN TO CONTINUE TEST 
3536 024506 137 025160 IMP 50s 
5 1 1236 4S: CLR SESCAPE ;CLEAR TO JUMP TO NEXT TEST 
5533 Peet 032777 891508 1S4414 BIT B51TS, aSHR ; CHECK IF LOOP ON ERROR 
2601 Deusee O13 ba o01254 MOV STESTN,RS :GET CURRENT TEST NUMBER 
56 4 005305 ASL RS ‘AND SET UP TO ESCAPE TO NEXT TEST 
5603 534 0165 033472 001236 MOV $SWOSTB(RS), SESCAPE 
5604 S42 162737 0 001236 SUB #2, SESCAPE 
eEDe 50 SS: 
5607 50 012605 MOV (SP)+,RS ;;POP STACK INTO RS 
S608 Oe4552 012603 MOV (SP )+'R3 +:POP STACK INTO R3 
5609 554 012601 MOV (SP)+/R1 ::POP STACK INTO RI 
5610 S& 012600 MOV (SP)+,RO ;;POP STACK INTO RO 
bil 60 piesoq RTS R4 
5613 Oe4S62 005237 002326 6S: INC BITCNT 3B BIT COUNT 
5614 4566 005705 TST RS :CHECK IF LAST BIT OF THIS WORD 
5615 624570 100402 BMI 8g :HAS BEEN SIMULATED - YES - SKIP 
5616 O24572 006305 ASL RS :SHIFT TO NEXT BIT 
Be17 024574 000716 BR 7§ :GO DO THIS BIT 


CZR6EBO RK611 CTRL PRTS MACYII P 
eRe e ett BebecSoe 1orel 3B eee 1 HBBE HEADER: 3 "ee eSSpare SEQ 0106 
5619 024576 005737 001204 gS: TST STMP1 ;TEST IF pass FOR 1ST WORD JUST DONE 
bee 878789 BS at. ro NO," wokb 2 IN RO FOR SIMULATION 
001204 INC STMPI :BUMP PASS COUNT 
bbe3 024612 000705 BR 113 
001204 oo0002 9s: TMF 1, #2 WITH WORD 2? 
cS Re He a enn 
, 001204 ONC Thea ‘BUMP PASS COUNT be 
15 BSdess BORE32 R $18 
3727 001204 000003 10S: CMP STMP1, #3 ; Jus T DONE WITH WORD 3? 
ag eck F Bor 
L !PUT IN WORD O OF GAP 
5634 46 012705 100000 #B81T1S,RS ‘SET TO GIVE IT 1ST GAP BIT 
Bs pepe Z 001204 NC :BUMP PASS COUNT 
024660 023727 001204 O00004 16S: CMP STMP1, #4 ; TEST IF READY FOR GAP 
5639 O24666 001436 BEQ 12S :YES - SKIP 
4 THE FOLLOW CODE OMPUTES T OF CLOCK 
ee  —-PAFSERUBHED Rags OF, SOMEMTES AI MREEY Sh 
Rath ed PERF ORTED meatirea 20, UPR E Tre APRESS THE DHAT WAS 
Bb4S : SE COUNTERS HE OPERATION STARTED (L.DC AND L.DA). 
24S 024670 012701 oD0025 MOV ;PRESET R1_ FOR 24 SECTOR MODE 
pouB De4e74 032737 010000 002260 Bit ePAT LCi 518 IT CTOR MODE OPERATION? 
Deu7b9 I 2 MOV 3 Ri ELSE 22 SECTOR MODE 
eee 710 Bt saptaare 21S: BIS M3 t9_R1 sb FoR Ne HEAD ae: 
5652 024714 G23701 OO02266 CMP L.OS, Ai TEST IF TRACK/SECTOR ADDRESS WAS MAX 
5653 7 BNE 178 iO SKIP 
5654 i 000100 MOV a8 Tb, RS !SET FOR 8 BITS OF GAP TO UPDATE 
sese z : 002266 17S: chee b Ss Ri ;TEST IF SECTOR WAS MAX 
eres p38 000400 MOV tayre.s :SET FOR & BITS OF GAP TO UPDATE 
705 010000 18S: MOV #81T12,RS ;SET TO GIVE 1ST 4 BITS OF GAP 
S661 024750 905237 001204 19S: INC STMP1 ;BUMP PASS COUNT 
peu7e4 one? 32 100000 o02244 BIC #ROGATE,E.MR1 CLEAR READ GATE 
7 3 7$ 
Sbb4 ; END OF BLOCK 
a3 4 7 032356 12S: JSR R4, GETREG ;GET RK611 REGISTERS 
eee? O54790 Bos734 TST (R4)+ ; BUMP TO-NEXT ERROR RETURN 
5668 772 013737 002260 o02220 MOV L.CS1,&.CS1 :SET EXPECTED CS1 
5669 000 023737 O92160 O0e2c0 CMP T.CS1°E.CS1 !CHECK IF CORRECT 
3670 006 O01241 BNE 4g :NOQ SKIP 
5672 o25010 005724 TST (R4)+ ;BUMP TO NEXT ERROR RETURN 
5673 OeS501l2 013737 002274 oDe2e40 MOV L.DCYL,E.DCYL ;GET STARTING CYLIN 
5674 025020 013737 O0e2b6 O0eceb MOV L:0A,E:0A : TRACK/SECTOR 
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002226 
000026 
010000 
ooode4 
cpa) + 002226 
Ue oo 
aay ae 
re 002227 
OG22e27 
a 025106 005237 ‘02240 
5136 rated 002240 
Es pes 14 en 
S636 OSe1 3 60013 024S1e2 
S697 025136 013737 O02240 
5698 025144 013737 OGe2 
1 7 
Se BBS SBRTE? oovsso 
24'S Os3160 A 001000 
27 B51 037 001236 
e508 0eS174 000137 Oe4SS0 
7 4 
sie SSR RAR 
710 
$711 
57le 
5713 
esid 
71S 
5716 
ai? 
718 
$7193 
$720 
572 
57e 
$723 
5724 
$725 
S726 
$727 
$728 
$729 
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002260 


002200 
002166 


002274 
002266 


1537S2 


DOS 


O2-DEC-77 10:43 PAGE 107 SEQ 0107 
DIAGNOSTIC MODE HEADER READ AND COMPARE 
INCB E.DA ; BUMP SECTOR 
oy FEB LPO cst 4 ETEST IF IN Be SECTOR MODE 
Q 1S§ sy ies - ace Ep °° 
13S: CNP Rpt 0A :CHECK_IF CTE SECTOR on To PARGE 
. . g P 
a ee oe 
MOV #3,RO0 i Bee FOR 3 TRACKS (RKO6) 
CMPB E bA+1,RO ;CHECK IF TRACK INC TO LARGE 
BNE § ;NO - SKIP 
CLRE E.0A+1 ;CLEAR TRACK TO O 
INC E.OCYL :BUMP CYLINDER 
15S: cMe E.QCYL,T.DCYL ; CHECK IF CYL OK 
cn E-0A,T.DA :CHECK IF DA OK 
ess: IMP 
26S: MOV E.DCYL,L.DCYL ;STORE COMPUTED NEXT CYL 
MOV E.DA,L.0A :AND NEXT DA 
TST (R4)+ ;BUMP TO NO ERROR RETURN 
IMP S$ :GO TO GOOD EXIT 
Sos: BIT #B1T9,aSWR s TEST IF Loop ON ERROR 
st, E CAPE >CLEAR Kg LOOP ON ERROR 
51S: " Vv RY, -(SP) ;SET STACK TO CONTINUE TEST 
- SBTTL DI TIC MODE GAP READ AND SYNC WRITE 
* THE READING 2 OF THE GAP GAP ay WRITING OF THE SYNC (OR PREAMBLE) 
+ THE FIRS I R COMPARE 
-& 
i; ROUTINE Re PNG THE REMAINDER ARE PROCES CHE HERES THEN a 
1% CHECK N AND 255 “0” BITS 
* AND A S a » [ah pit ig Setten 
3% CALL: 
1a ISR R4, DWGPSN 
ta ERR is ;MR1 IN ERROR IN 7BEAQ. GAP 
* i ERROR 16 :CS1 IN ERROR AF AD GAP 
1a ERROR ? ?MR1 IN ERROR IN TER Te “5 
i ERROR 0 !CS1 IN ERROR AFTER SYNC WRITE 
$x ROUTINE CALLED: 
:% IS PC WRIBIT 
1 i RETURN POINT IF ERROR IN WRTBIT 
1 i NO ERROR RETURN 


CZR6EBO RKG11 OSKLS CTRL PRTS MACYI1 30(1046) O2-DEC-77 10:43 PAGE 108 SEQ 0108 
CZR6EB.P11 02-DEC-77 10:21 DIAGNOSTIC MODE GAP READ AND SYNC WRITE 
5731 S204 DWGPSN: 
5732 BSe5oq 010046 MOV RO,-(SP) - ;PUSH RO ON STACK 
2534 TE FOLLOWING COE ADTUST THE Court FORTHE REDATIOER OF 
735 : READ IN THE HE POU INE FOR ADDRESS REGISTER UPDATE 
736 025206 $737 002266 rst LDA j TEST If DESIRED TRACK/SECTOR NOW O 
( O06 $ on 
EY 4 0127 900066 MOV #54. RO *ELSE ROJUST COUNT FOR cyt CHANGE 
87 ei il 002326 HOV 011,81 CNT i BRESET BIT COUNT FOR REST OF GAP 
Tae x ab0 002266 8s: TSTB £.0s ; TEST IF NEW SECTOR IS O 
24 Ed 000070 ey #56. ,RO *ELSE ADJUST COUNT FOR TRACK CHANGE 
tad 0 o000n? 002326 nov 7 BITCNT ZPRESET BIT COUNT FOR REST OF GAP 
are epetd oo000cS 002326 9S: MOV #5, BITCNT ;PRESET BIT COUNTER FOR REST OF GAP 
ta 025260 012700 000074 nov ~ ted, + RO :SET COUNT FOR 60 BITS 
3 4 002244 - MOV #OMD! ECCW!MEWD,E.MR T EXPECTED MRI 
Ba ey fee fee es est a 
753 7 031616 1$ ISR PC. ROBIT >GO 4 
4 162 paaete 002 MOV RKMRI(R2),T.MR1 ;GET MRI 
2758 4 37 002244 o002204 CMP EOR1, THR i CHECK If GORRECT 
3757 e737 02534 001236 nov eS, SESCAPE :SET RETURN TO CONT TEST 
5759 bobeis 002326 11S: INC BITCNT ;BUMP BIT COUNT 
5760 300 DEC RO :DEC LOOP COUNT 
576 1357 1$ :LOOP IF NOT ZERO 
2 21 BR 4§ :ELSE SKIP 
5764 025346 005037 001236 2$: CLR SESCAPE ;CLEAR TO EXIT OR LOOP 
2765 Ose3e5 651011 001000 153560 CMP #8179, JSWR j ERROR RE TURN: CHECK IF LOOP ON ERROR 
5767 025. 43700 001254 nov STESTN, RO }GET NUMBER, OF NEXT TEST 
5759 Oes3 ae 37 033472 001236 MOV SSWOSTB(RO),SESCAPE ;SET ESCAPE FOR GOT TO NEXT TEST 
2420 025376 162737 O00002 001236 - SUB #2, SESCAPE ;SET tO FIRST INST (SCOPE) 
2776 gesHO4 912600 2 Hoy (SP)+,RO ;;POP STACK INTO RO 
5774 
5775 025410 004437 032356 4S: JSR R4, GETREG ;GET RK611 REGS 
3776 025414 005724 TST (R4)+ :BUMP TO NEXT ERROR RETURN 
57 Oe 416 013737 002260 002220 MOV L.CS1,E.CS1 :SET EXPECTED CS1 
778 424 023737 O02160 O0ecc0 CMP T.CS51°E.CS1 ‘CHECK IF CS1 OK 
2723 025432 00134S . BNE 2s :NO - SKIP 
2781 025434 005724 TST (R4)+ ;BUMP RETURN POINTER 
5783 025436 005037 002326 CLR BITCNT ;CLEAR BIT COUNTER 
5784 geste 005037 O023e2 CLR M1. BIT ‘CLEAR ALL WRITE BIT INDICATORS 
5785 025446 005037 002324 CLR M2.BIT 
5786 Oe54Se 005037 O02e316 CLR P1.BIT 
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5787 OeS4S6 002320 
$788 OeS46e Ole 3 062040 
5750 025470 012700 O00400 

731 025474 737 030652 
5733 002326 
7 1 37 
Be teed Bhs 
738 S14 O446 
cp SS Bs 
S20 012737 o00001 
cis feeees Bisee, Cetese 
534 posea7 002326 
5806 025540 004437 032356 
5807 O0eS544 9005724 
SS46 3737 002160 
230 SS4 1274 
5811 SS& 005724 
eats BSeee0 000711 
5814 O2556e 032777 001000 
5815 5 001403 
att 25 37 001236 
581 702 
eni8 Ge5600 010446 
5819 OeS60e 0204 
5820 
se 
se 
S824 
5825 
5826 
S827 
5828 
$8e9 
5830 
5831 
5832 
$833 
5834 
5835 
2B3 OeS604 010046 
$838 010146 
5839 025610 010346 
5840 Ges6le 010546 
S841 025614 005037 002326 
S842 OeS6e0 005037 O0234e 


MACY11 


o02e44 


002316 


002220 


153350 


O46 


3061 
DIAGNO 


6S: 


7$: 


SOs: 


S18: 
. SBTTL 


22 2 2 2 2 2 2 2 2 8 8 8 


) 
S 


DWRITE: 
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02-DEC-77 10:43 PAGE 109 
TIC MODE GAP READ AND SYNC WRITE 
CLR PR.BIT 
MOV #OMD!ECCW! MEWD!WRIGATE,E.MR1 iSET EXPECTED MRI 
MOV #256. ,RC ;SET COUNT To’WRITE 256 “0” 
ISR PC,WRTBIT ;CALL_ WRITE BIT 
BR 6$ *ERROR RETURN - SKIP TO HANDLER 
INC BITCNT ‘BUMP BIT COUNT 
DEC RO :LOOP UNTIL ALL 256 
BNE S :BITS ARE WRITTEN 
MOV RY, -(SP) ;WRITE ERROR HANDLER-SET 
RTS :STACK FOR REPORTING SUBSEQUENT ERRORS 
MOV #1,P1.BIT ;SET SYNC 8 T OF 1 AS NEXT BIT 
JSR PC, WRTBIT jGO WRITE Tt 
INC BITCNT + BUMP att COUNT 
ISR R4, GETREG ;GET RK611 REGS 
TST (R4)+ :BUMP TO NEXT ERROR RETURN 
CMP T.CS1,E.CS1 ?CHECK IF CORRECT 
BNE 2s , :NO - SKIP 
TST (R4)+ ;BUMP PAST_ERROR RETURNS 
BR 3S :GO TO EXIT 
BIT #B81T9, ISWR 5 TEST TE LOOP ON ERROR 
cLR SESCAPE ‘ELSE SET TO LOOP 
MOV RY, -(SP) ;PRESET STACK FOR RETURN 


RTS 

BIBGNOSTIC WRITE DATA AND ECC ROUT ie 

THE DATA IN THE OUPUT BUFFER IS WRITE SIMULATED, ECC IS 
GENERATED AND WRITTEN, AND THE POSTAMBLE IS WRT TTEN: 
CALL: 

JSR RY, OWRITE 

ERROR 17 ;MR1 IN ERROR IN WRITING 

ERROR el ;ECC ERROR IN WRITING 

ERROR 22 ;CS1 ERROR AFTER WRITE 


NO ERROR RETURN 
ROUTINE ager aE 


JSR TBIT 
RETURN POINT IF ERROR IN WRTBIT 
NO ERROR RETURN FROM WRTBIT 


MOV RO,-(SP) ;;PUSH RO ON STACK 
MOV R1’-(SP) ??PUSH R1 ON STACK 
MOV R3,-(5P) ::PUSH R3 ON STACK 

MOV RS'-(SP) +:PUSH RS _ON STACK 
CLR BITCNT :CLEAR BIT COUNTER 
CLR ECCLO :CLEAR ECC LOW 


SEQ 0109 
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5843 


aes 





00513 
000675 


02-DEC-77 


fern flee Hires 


10:21 
340 


020000 
026374 
010000 
001214 
040000 


? 001214 
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002324 
002322 
002320 


002316 


002214 
002214 


002260 


002244 


002260 


32$: 


33$: 


78: 


O2-DEC-77 10:43 PAGE 110 
DIAGNOSTIC WRITE bara AND ECC ROUTINE 


aie pore eens Oot OUTPUT DATA . 


the "Bol ata Set 


Ding 


Ly. FOLLOMING CODE Rie gt THE WRITING OF 400 WORD 


Oe APT R-BtT PROM RIGHT 15 Miami POINT TO THE C 


STMPS 

#B81T0,R1 

(R3)+,RS 

BA BT Meaty 

P1-BIT,PR.BIT 

Ri: Re 

at P1.BIT 

a 

RKEEET CRE) 47 

E. TbepT 

a 

1 

BITCNT 

Rl 

7$ 

Rl 

RO, #1 

#CFMT,L.CS1 
MPS 

325 

ug 

R1 


4$ 
wECCW,E.MR1 
4$ 

20s 


#CFMT,L.CS1 
STMPS 
#BIT14,R1 
swe 


a BIT. 
;CLEAR_ SWITCH 
LOAD BIT POINTER 
iGET A WORD FOR WRITING 
Ber FES Clabe TO_CURRENT-2 
TO CURRENT-1 


a Pe Phir IS ONE 


ELSE caer Net ¥T BIT 
EONGeNERNTE Ecc SEER THIS BIT 


Ecpt 
s CHECK F ECC CORRECT 


;JUMP TO ERROR EXIT 


TEST. BIT POINTER 
ny aati 0 


- GO TOL 
SECTOR MODE 


2 
4 BIT SWITCH SET 


CAST” ORD 


m 

iw 
mow 

4% 


a T IF LAST BIT OF LAST WORD 
;ELSE SET MRI FOR ECC WRITE 


f ta ge SECTOR MODE 
iNest Ie # 18 BIT SWITCH SET 
jSET LF SUPPLY 2 MOR »grrs (16 & 17) 


oe ETRE. 18 BIT SWITCH 
:GO WRITE THE BITS 


SEQ 0110 


sr: ee OSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 11 SES O111 


= 


il 02-DEC-77 10:21 DIAGNOSTIC WRITE DATA AND ECC ROUTI! 
5899 geeg7e 905037 001214 30S: CLR STMPS ;CLEAR THE SWITCH 
8901 100 001 me Oe. oe UEC OT VERO» GO GET NEXT WORD 
cs Heike Bree gua che BINS ag © ELEAE COW HES, ControL 
O261i2 012701 000001 MOV #BITO,R1 :SET BIT POINTER 
cs Stile RI QRERE GRERES FY BL BHTANE-BET sSMIFT aT torcerone sani 
026132 013737 902316 002320 nov P1.B1T,PR.BIT - ones 
ait Ose iss baeibe Bry RL; RS Heer IE BIT re ZERO 
Gilg GSELED GLACE? BURR OS ag, NAL CaNBHT ES eH, ME 
e3i4 162 O00S0i BR 148 ;WRTBIT ERROR - SKIP 
002326 415 TCNT 
He aie an an a A 
5320 pSeice 001214 000001 che STMPS, #1 ite ST ae F WRITING: LAST ECC WORD 
ses ae bos701 tgt R ELSE Te EST RITING LAST BIT OF LAST ECC 
o3ee Gebele 052737 o20000 o022e44 BIS #ECCH, E. MRL :ELSE Set ECCW IN MRI 
1H 
737 001214 10S: TST STMPS ; TEST pA 0 JUST DONE 
se Eee Be co. fe eee BREE cour 
e331 BSe5aq bi570e §99993 MOV Hotel *R ye Cc Pal WSED 
3 026244 BR 8g 
334 026246 012701 000017 11S: MOV #15.,R1 a A BIT COUNT 
3936 026252 013737 one ese og2324 12S: Mov m1. BIT, M2. BIT ;SHIFT BIT INDICATORS 
5330 osese Bisa ere 002320 Cor pi-BITP ‘BIT ;SET ZERO FOR WRITE POSTAMBLE 
Sout 926300 904737 03065 aR tS akc GO watts eet Or RR - SKIP 
Bue Ose30 002326 425: INC BITCNT BUMP ef 
594 1 5301 DEC R1 :DEC BIT 
paua 026314 00 B 12S * LOOP UNTTIL NBIT COUNT 0 
eye pee azs OO 3704 baize0 nov STE RI” Get es: ERROR RETURN 
23g g057e4 TST (RY) + :BUMP TO cSLe OR RETU 
eeu3 13737 002260 002220 MOV L.CS1,£.CS1 !GET EXPEC tone 
951 026336. 023737 002160 002220 CMP T.CS1,E.CS1 ;CHECK_IF CORRECT 
225 pSeaue ale 2934 af a NO 76/000 RETURN 


5954 026350 O00446 BR 19$ :GO TO RETURN 
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ee 


UWIUIUTUTUI UT UT UT UU UU UU 


os PERE SP RNRR oe Sd sat ae 


BeRReoS 


WWII UU 
@o 
0 


0.0.0 
Do 


D.De0 
RRL 


KLS CTRL PRTS 
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026352 013704 


psesen 012737 
4 000410 


4 1 
series isha 
peeves 012605 
026470 012603 

647e 012601 

474 012600 


026500 
Oe6SO0 010046 


001220 
025760 


001216 


001216 


001216 
001000 


001236 


001236 
001000 


0012S4 


033472 
00000e 
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1SeS24 


152476 
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O2-DEC-77 10:43 PAGE ile 


DIAGNOSTIC WRITE DATA AND ECC ROUTINE 


13$: MOV STMP7 RY ;SET FOR ECC ERROR RETURN 
nov #4108, SESCAPE :STORE RETURN POINT FOR NO LOOP ON ERROR 
14S: MOV STMP6,RY ;SET FOR MR1 ERROR RETURN 
BR 16% 
20S: MOV STMP6,RY ;SET FOR MRI ERROR RETURN 
BR 16$ 
1S$: MOV STMP6, RY ;SET FOR MR1 ERROR RETURN 
16S: BIT #81TS, ISWR ;CHECK IF LOOP ON ERROR 
BEQ 178 :NO - SKIP 
CLR SESCAPE ;CLEAR_ESCAPE 
BR 19$ :SKIP TO EXIT 
178: MOV RY, -(SP) ;CONDITION STACK 
RTS RY :GO REPORT ERROR 
18S: CLR SESCAPE ;CLEAR FOR LOOP OR EXIT 
BIT #8179, aSWR :CHECK IF LOOP ON ERROR 
BNE 138 :YES - SKIP 
nov STESTN, RO :SET UP TO SKIP TO NEXT TEST 
MOV $SWOSTB(RO), SESCAPE 
_ SUB #2, SESCAPE 
f MOV (SP)+,RS ;;POP STACK INTO RS 
MOV (SP)+;)R3 ::POP STACK INTO R3 
MOV (SP)+/R1 ::POP STACK INTO RI 
MOV (SP)+;RO ::POP STACK INTO RO 
RTS RY 
.SBTTL DIAGNOSTIC MODE READ GAP AND DATA SYNC 
: READING OF THE GAP AND READING OF THE SYNC (OR PREAMBLE) 
i IS HANDLED IN THIS ROUTINE. 
2% HE FIRST GAP BITS ARE PROCESSED IN THE HEADER COMPARE 
i ROUTINE AND THE REMAINING GAP BITS ARE PROCESSED HERE. 
i THEN @ CHECK IS MADE THAT READ GATE CAME ON 
a AT THE 129TH BIT OF SYNC.;# 
1 CALL: 
: ISR R4, DRGPSN 
a RROR 15S ;MR1 IN ERROR IN READ GAP 
* i RROR 16 *CS1 IN ERROR AFTER READ GAP 
1a ERROR 32 ?MR1 IN ERROR IN READ SYNC 
i ERROR 33 'CS1 IN ERROR AFTER SYNC READ 
:% ROUTINE CALLED: 
;* R PC, ROBIT 
DRGPSN: 
MOV RO,-(SP) ;;PUSH RO ON STACK 


SES Olle 


JOS9 
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CZR6EB.P11 02-DEC-77 10:21 DIAGNOSTIC MODE READ GAP AND DATA SYNC 
6011 ; THE FOLLOWING CODE ADJUST THE COUNT FOR THE REMAINDER OF 
6012 : THE GAP. THE ADJUSTMENT DEPENDS ON HOW MANY GAP BITS WERE 
6013 : READ IN THE HEADER COMPARE ROUTINE FOR ADDRESS REGISTER UPDATE 
6014 ozesce 737 002266 TST L.BA ; TEST IF DESIRED TRACK/SECTOR NOW O 
1S 1006 BNE :NO - SKIP 
6016 026510 012700 o0n066 MOV #54. .RO :ELSE ADJUST COUNT FOR CYL CHANGE 
601 Gebe14 1673? 000011 002326 nov 411, BITCNT :PRESET BIT COUNT FOR REST OF GAP 
e018 Oseses 7 002266 8S: TSTB L.DS ;TEST IF _NEW SECTOR IS 0 
1 BNE 9g :NO - SKIP 
6021 Geb53e 1 900070 MOV #6. RO *ELSE ADJUST COUNT FOR TRACK CHANGE 
b0ce 36 12737 000007 002326 nov ‘ BITCNT :PRESET BIT COUNT FOR REST OF GAP 
boss Oeeeye ei 990005 002326 9S: MOV #S,BITCNT ;PRESET BIT COUNTER FOR REST OF GAP 
60 sy Ol 74 MOV #60. ,RO :SET COUNT FOR 60 BITS 
5026 ; END OF BLOCK 
6028 560 012737 O22040 o02244 10S: MOV SOMD!ECCW!MEWD,E.MR1 ;SET EXPECTED MRI 
6029 320 CLR PR. BI ;CLEAR PRESENT BIT 
6 322 CLR M1.BIT *CLEAR PREVIOUS BIT 
6031 737 031616 1S: ISR PC. ROBIT :GO READ BIT 
60 1 000026 002204 MOV RKARI(R2),T.MR1 ;GET MRI 
60 i ; 002244 o02204 che E ORL, T.MRL i CHECK IF SORRECT 
6035 016737 26642 001236 HOV eS, SESCAPE :SET RETORN TO CONT TEST 
eae 026630 237 002326 11S: INC BITCNT ;BUMP BIT COUNT 
6038 02534 poe S30 DEC RO !DEC LOOP COUNT 
6039 Oe66 001357 BNE 1$ :LOOP IF NOT ZERO 
B040 026640 000421 BR 4§ :ELSE SKIP 
ate 026642 005037 001236 2s: CLR SESC ;CLEAR TO EXIT OR LOOP 
B03 Debb46 e777 001000 152264 CNP 8617S, SHR j ERROR RE TURN: CHECK IF LOOP ON ERROR 
604S ee 0137) 001254 MOV STESTN, RO :GET NUMBER OF NEXT TEST 
BONE 906300 ASL RO ‘SHIFT FOR INDEXING 
604 Gebbbs 01603 33472 001236 MOV $SWOSTB(RO),SESCAPE  ;SET ESCAPE FOR GOT TO NEXT TEST 
B048 B72 162737 p3a008 001236 = SUB #2, SESCAPE ;SET tO FIRST INST (SCOPE) 
eoca bSe700 012600 ’ MOV (SP)+,RO ;;POP STACK INTO RO 
6 1 026702 Oo00204 RTS R4 
6053 704 004437 032356 4S: JSR R4, GETREG :GET RK611 REGS 
6054 Oeerig 9087 125 (R4)+ :BUMP TO NEXT ERROR RETURN 
6055 02671 3737 002260 002220 MOV L.CS1,E.CS1 :SET EXPECTED CS1 
6056 026720 023737 002160 O0eececd CMP T.C51°E.C51 :CHECK IF CS1 Ok 
6057 026726 001345 BNE 2s :NO - SKIP 
6059 026730 005724 TST (R4)+ ;BUMP RETURN POINTER 
Poet 026732 005037 002326 CLR BITCNT ;CLEAR_BIT COUNTER 
6062 026736 012737 Oee040 oo02e44 MOV #OMD!ECCW!MEWD,E/MR1 ;SET EXPECTED MRI 
6063 O26744 O12700 o00200 MOV #128. ,RO ;SET COUNT TO READ 128 “0” 


4737 031616 S$: JSR PC,ROBIT ;CALL READ BIT 
6066 Oe67S4 016237 O0000e6 d02204 MOV RKMR1(R2),T.MR1 ;GET MRI FOR TESTING 


é 


gi 
~ 28 


atalatelatatatetat ay 
RARER RRREEUE: 


seernenees 


5 
8 


: 
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02-DEC-77 10:21 DIAGNOSTIC MODE READ GAP AND DATA SYNC 
023737 o02244 002204 CMP E.MR1,T.MRI ;TEST IF CORRECT 
001404 BEQ 2e$ :YES - SKIP 
g26778 912737 027002 001236 MOV #22S, SESCAPE ;SET_RETURN FOR CONTINUE TEST 
6 BR Sos :GO TO ERROR EXIT 
37 002326 22S: INC BITCNT :BUMP BIT COUNT 
DEC RO ;LOOP UNTIL ALL 128 
1 1 BNE :BITS ARE READ 
1 1 000177 MOV #127. ,RO ;SET COUNT FOR REST OF SYNC 
490000 002244 BIS @ROGATE.E.MR1 ;SET EXPECTED MR 
7 31616 6S: JSR RDOBIT :G0 C READ BI 
16237 000026 002204 MOV RKMR1(R2),7T.MR1 ;GET MRI FOR TESTING 
027036 3737 O022e44 O02e204 CMP E.MR1,T.MR1 :TEST IF CORRECT 
7044 1404 BEQ 23$ :YES - SKIP 
rans 12737 027056 001236 MOV #23S, SESCAPE ‘ELSE SET ESCAPE 
4 37 BR Sos :GO TO ERROR REPORT EXIT 
005237 002326 23S: INC BITCNT ;3UMP_BIT COUNTER 
20be 309 DEC RO ;DEC_ BIT COUNT 
4 00135 BNE es ‘LOOP UNTIL ALL 127 READ 
7066 012737 1 002320 MOV #1,PR.BIT ;SET SYNC BIT OF 1 AS NEXT BIT 
7074 7 031616 ISR PC’ ROBIT :GO_ READ I 
7100 016237 OO0002e6 oo2244 MOV RKMRi(R2),E.MR1 ;GET MR1 FOR TESTING 
027106 ge373, 002244 O0ee04 cn ERI, T.MRL ; CHECK IF CORRECT 
027116 Bie737 027126 001236 MOV #24S , SESCAPE tELSE SET RETURN FOR CONTINUE TEST 
027124 000413 BR sos 
005237 002326 24s: INC BITCNT ;BUMP BIT COUNT 
004437 032356 ISR R4, GETREG ;GET RK611 REGS 
pos? <4 TST (R4)+ BUMP TO NEXT ERROR RETURN 
027 3737 002160 o02220 CMP T.CS1,E.CS1 :CHECK IF CORRECT 
027 001235 BNE 2s :NO - SKIP 
27 005724 TST (R4)+ ;BUMP PAST ERROR RETURNS 
027 o00652 BR 3$ GO TO EXIT 
027 032777 001000 151756 SOS: BIT #8179, aSWR ;TEST IF LOOP ON ERROR 
027 001403 BEQ S1$ *YES - SKI 
Ge? 905037 001236 cLR SESCAPE tELSE SET TO LOOP 
027 010446 51S: MOV R4,-(SP) ;PRESET STACK FOR RETURN 
027 000204 RTS RY 
.SBTTL DIAGNOSTIC READ DATA OR DIAGNOSTIC WRITE CHECK ROUTINE 
; THIS ROUTINE IS USED TO SIMULATE THE READ OR WRITE CHECK 
1a OF DATA. THE ROUTINE WILL TRANSFER A FULL OR PARTIAL SECTOR. 
1 i THE FIRST WORD AFTER THE CALL SPECIFIES HOW MANY WORDS 
i ARE TO BE TRANSFERRED. 
:% IF LESS THAN A FULL SECTOR THE ECC AT THE END 
ta OF THE TRANSFER NOT CHECKED. THE ECC IS CHECKED AT THE TIME 
i EACH BIT IS TRANSFERED. 
x EITHER 16 OR 18 BIT WORDS CAN BE SIMULATED 


keneeee RK611 DSKLS co PRTS MACYI1 30(1046) O2@-DEC-77 10:43 PAGE 115 SEO 0115 


EB.Pil 02-DEC-77 10:21 DIAGNOSTIC READ DATA OR DIAGNOSTIC WRITE CHECK ROUTINE 
123 :% € T TATE FMT BI Cc F BITS 
e188 i OFF RP aN i ReD, Here 16 ak it Are Acdiinko #4: ae zt Ro® 
1 1% OCATION E WITH THE ECC 
e183 H COUNT EX CER At Fhe END OF THE NbaTA TRANSFER. “tits 
61 8 3H NE MUST OCCUR BEFORE THE ROUTINE IS CALLE 
£153 & ANOTHER LOCATION, ECPATX, IS SET TO O IF THE ECC IS EXPECTED 
6131 # TO BE CORRECT AND SET TO’1 IF AN ERROR IS BEING FORCED. 
£135 1% A oan? LOCATION, pESCSR, cSRECIEIES TH THE SOURCE OF THE ECC 
pi3e + HECKT Mee Abe TAKEN FROM THE.” 
ei3e $x feet hus° Fuoeoe, £60. OBUFF iPpstea.” if Fe ROMPUTED 
6137 : C WORDS FROM ECCHI AND ECCLO ARE U 
6138 5% ALL 
61393 ;* ¢ R BO 
6140 $i : NGTH oF 4, PRES ER 
6141 1% R ;MR1 IN ERROR READING DATA OR ECC 
6142 2 3 ERROR 35 *ECC ERROR RE ING DATA 
6143 " ERROR ?CS1 ERROR AFTER READING DATA OR ECC 
b144 i ERROR a sECC REGISTER INCORRECT AFTER READ ECC 
pide 2 am 45 ERR ih kg OS CUNTING 
6147 oi 
6148 x 
6149 = 
6150 :% ISR R4, DWRTCK 
pies + ERROR oa TRANSFER RROR WRITE CHK OR ECC READ 
pies a RROR 54 ieee ea on Wt TE SHE 
6154 % ERROR 5S :CS1 ERROR AFTER IN A HRT K OR ECC READ 
6155 1% RROR 4 ER EGISTER NGORRECT FIER READ ECC 
61 * RROR 4 IN ECC PAT CALCULATION 
6157 i ERROR 43 RR IN ECC POS COUNTING 
eieg :% ROUTINES omae: 
6160 :% RDBIT 
6161 $i ECCGEN 
6162 ;*# 
6163 
6164 7176 DWRTCK: 
b165 71 DREAD: 
166 7176 O1004%6 MOV RO,-(SP) ;;PUSH RO ON STACK 
6167 O27200 010146 MOV 1'-(SP) +:PUSH R1 ON STACK 
61 027 10346 MOV += (SP) ;;PUSH R TACK 
61 7 105 MOV RS’-(SP) HH ACK 
61 7 1 MOV (R4)+,RO ;ST0 T 
6171 027210 010437 oo01216 MOV RY, STMPG ; STORE MR1 ERROR RETURN 
b17¢ 7214 005724 TST (R4)+ ?BUMP TO NEXT RETU 
617 7216 010437 001220 MOV R4, STMP7 : STORE ECC E of 
6174 Oe7eee g057e4 TST (R4)+ :BUMP TO NEXT ERROR Ri TURN 
6175 7224 010437 001210 MOV RY, STMP3 TORE CS1 ER RETURN 
6176 027230 005724 TST (R4)+ :BUMP TO NEXT ERROR RETURN 
6177 027232 010437 oDl1212 MOV R4, $STMPY :STORE ECC REG ERROR RETURN 
6178 027236 005724 TST (R4)+ ‘BUMP TO NEXT ERROR RETURN 
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26 o0e204 


002204 
030262 
002326 
030462 
Boasts 
030276 
002326 


7 010000 


001214 


7A pome 


001214 


002244 
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DIAGNOSTIC READ DATA OR DIAGNOSTIC WRITE CHECK ROUTINE 


32$: 


1S: 


43$: 


44S: 


30$: 


RY ee 
BOBUFF RS 
pirat 

BEES 

STMPS 
gSEnT,L.csi 
#11000,STMPle 
#11 1 stele 
si 1,STMP14 
#18001; StHP1S 
#10041, STMP14 


#BITO,R 
CRa}# sR 
PR.BIT,M1.BIT 
PR. BIT 

Rl, 

#1,PR.BIT 


PC, RDBIT 
RKMR1(R2), T.MR1 


T.MR1,E.MR1 
4 


error 


; STORE yd ERR RETURN 


Men BM Eda S aaa adv 
; ss OF BUPFER 
;CLEAR BIT COU 


;CLEAR ECC COMPUTED LOCATIONS 


CLEAR FOR 18 BIT MODE SWITCH 
iTeST La 48 BIT MODE 


;ELSE SET UP BIT COUNTS FOR 18 BIT MODE 


;SET BIT COUNTS FOR 16 BIT MODE 


+ OFF Bare. wo POINTER 


;SHIFT PRESENT INTO PREVIOUS 
HES APTPRESENr BIT Is 0 
;ELSE INSERT A 1 

3 GO READ BIT 


i CHECK af tates 
;YES - SKI 


; TEST IF FIRST BIT OF DATA 


;YES - SKIP ECC GEN 


c 
eet Bis, jecet ;TEST IF ECC CORRECT 


10$ 
| eel 


Rl 

4$ 

#CFMT,L.CS1 

as 
T14,R1 

RPLTHS. RR 
MPS 

4$ 

STMPS 


FES Bia FES" WORD IS DONE 


ietse “SHIFT BIT POINTER 


; TEST IF 18 BIT MODE 
iTEST_  # *- aeueaaies BIT 16 OR 17 DONE 
ise} p INTER ben Br fore BITS 

T 


TRSER HI_ORD 
ENS 18 BIT SW 


;CLEAR 18 BIT SWITCH 


SEQ 0116 
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6235 
be 

623 
6238 


or 
SBIR 


RD 
to 
Wrue 
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beb4 
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027544 
027546 


0300Se 
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002320 
002320 


Baie 
Go2204 


312 
2326 


62 
pease 
eel4 


030276 


D02326 
p02e326 


002214 
002212 


002326 
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001226 
002322 


0S0636 
0S0640 


002322 
002320 
o02204 
002244 
001226 


002214 
O00eeS4 


214 
ele 
O0eeSe 
O00e2eS4 
O0eeS2 


001232 


33$: 


36S: 


SS: 


34S: 


363: 


49S: 


45S: 


46S: 


47S: 
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DEC 
BNE 


NOS3 


ECPOSX eet ag eggs TtON FOR REPORT 
T.ECPT,E.ECPT CORRECT 


20$ NO” SK 
T.ECPS,E.ECPS ;CHECK IF POSITION CORRECT 
20$ ;NO - SKIP 


BITCNT,STMP14  ;TEST IF ECC DONE 


PAGE 117 SEQ 0117 
DATA OR DIAGNOSTIC WRITE CHECK ROUTINE ; | 
| 
RO ;DECREMENT WORD COUNT 
3$ :IF NOT ZERO - LOOP 
BITCNT, STMPL2 ELSE TEST IF FULL SECTOR WAS READ 
8S sELSE JUMP TO EXIT - DO NOT CHECK 
ECC WORDS 
PR.BIT,M1.BI1T MOVE 6 LAST. DATA BIT FOR ECC GEN 
PC. ECCGEN ECC 
STMPS > CLEAR ATER PASS COUNTING 
ECCSRC :TEST WHERE ECC WORDS ARE 
36$ : THEY ARE_IN BUFFER - SKIP 
ECCHI , OBUFF+1000 ;ELSE MOVE THEM INTO BUFFER 
ECCLO; OBUFF +1002 
(R3)+,R5 ;GET ECC FROM BUFFER 
#BITO;R1 :SET BIT POINTER 
PR.BIT,M1.BIT ;SHIFT PRESENT TO PREVIOUS 
PR.BIT :AND SET UP PRESENT 
R1_RS 
348 
#1,PR.BIT 
PC’ ROBIT ;GO_ READ BIT 
RKMR1I(R2),T.MR1 ;GET MRI 
T.MR1,E.MR1 *CHECK IF_ CORRECT 
38S :YES - SKIP 
11$ pEL J TO, REPORT EXIT 
BITCNT,STMP12 ;TEST IF FIRST ECC BIT 
49$ ;YES - SKI IP Ecc ¢ GEN (ALREADY DONE) 
PC, ECCGEN * GENE: E ECC F BIT 
RKECPT (Re), T.ECPT ;GET PATT ARN 
T.ECPT,E.ECPT  ;TEST IF’ ECC PAT CORRECT 
45$ ;YES SKIP 
10$ ?ELSE GO REPORT ERROR 
ITCNT ; BUMP BIT COUNT 
ITCNT,STMP13 ;TEST 1ST BIT OF ECC 
46S :NO_- SKIP 
#ECCW,E.MR 56 Se CLR ECCH FOR ECC READ 
BITCNT, STMP14 5 TES I b BIT OF POSTAMBLE 
#ECCW Ta *ELSE Se! CCW FOR ECC DONE 
BROGATE,E.MR1 ;CLEAR READ GATE 
RKECPT( RE), T. ECPT ;STORE ACTUAL PA TTERN 
RKECP a Ecetee roe i's ACTUAL POSITION 
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RK611 OSKLS CTRL err 
CEReEE Pit b2-beEC= 77 10:2 IAGNOSTIC READ DATA OR 





soe os St OCG Mest Tre 
737 002346 ST ECPATX :TEST IF EXPECTED ECC IS O 
;(NO ERROR) 
0014 BEQ 48S :YES - SKIP 
3737 001232 002326 cn TMP14, BITCNT TEST TE FIRST POSTAMBLE BIT 
350 INC CPOSX ‘ELSE BUMP COUNT EXPECTED 
1 002214 S2s: MOV RKECPT(R2),T.ECPT BUNET TTE 
i 212 MOV KECPS(Re)’T.ECPS T POSIT FON 
252 MOV EC OSx,E.ECPS i 9ET EXPECTED POSITION 
620 214 254 CMP -ECPT|E.ECPT TEST IF PATTERN CORRECT 
Oe BEQ Si *YES - SKIP 
1 IMP 2 sELSE GO REPORT 
6304 3737 OOe2le OO022se SIS: CMP T.ECPS,E.ECPS CHECK IF POSITION CORRECT 
6305 4 BEQ 48S YES = SKIP 
£306 1 030342 IMP 235 tELSE GO REPORT 
6308 005701 48S: TST Rl ;TEST IF WORD DONE 
6303 100403 BMI 6$ :YES SKIP 
631 301 ASL R1 ‘ELSE SHIFT BIT POINTER 
b3ik 000137 027632 IMP S$ :AND LOOP 
6313 005737 001214 6S: TST STMPS TEST PASS COUNT. IF NOT O 
6314 (NOT THE FIRST ECC WORD JUST WRITTE) 
b316 001004 BNE 7S : = SKIP 
£315 005237 001214 INC STMPS ;BUMP PASS COUNT 
6318 030202 000137 027624 IMP 36S 
6 3727 001214 o00001 7S: CMP STMPS, #1 ;TEST PASS COUNT. IF NOT 1 (NOT THE 
past eat) a BNE $ t2ND ECC WORD JUST READ) - SKIP 
6322 930216 CLR : LEAR (POSTAMBLE ) 
cis Gense Shera) Optom Hey ge"! Bin "PncS° SOUR 
6326 30 000137 76 IMP 
6327 030234 004437 032356 gS: JSR R4. GETREG ;GET RK611 REGS 
6328 013737 O02260 o02220 MOV L.¢S1,E.CS1 ;SET EXPECTED CS1 
6 030246 023737 OO0ee2e0 O02160 CMP E.CS1/T.CS1 ‘CHECK IF CORRECT 
6330 SY 001060 BNE 2is :NO - SKIP 
b331 920256 005724 TST (RY) + ‘ELSE BUMP RETURN POINTER TO NO ERR 
b33e 000446 BR 13$ 
6334 030262 013704 o01216 9S: MOV STM ;SET RETURN TOR MRI ERR. 
6335 030266 012737 027434 001236 MOV sas. a ta :SET RETURN TO CONTINUE TEST 
6336 30274 000427 BR 125 
6338 030276 013704 o01220 10S: MOV STMP ;SET RETURN FOR ECC ERROR 
£339 030302 018737 OOs558 001236 MOV Baus. SSCAPE :SET RETURN TO CONTINUE TEST 
6340 030310 21 BR 12 
634 930312 013704 001216 11S: MOV STMP6,RY ;SET RETURN FOR MRI ERROR 
6343 31 12737 027742 001236 MOV #45, SESCAPE :SET RETURN TO CONTINUE TEST 
p44 030324 13 BR 125 
6346 030326 013704 001222 228: MOV STMP10,R4 ;GET RETURN FOR PATTERN ERROR 


a SN 


EfRces-Pii Ge-bec 


830340 806405 
13737 
O13 

001407 
005726 
005037 


plese 
Bisear 
000204 
nee 
yt 
016037 


i887 


030462 010046 
Geass fuer 

oe iobe 
030500 0i2700 
O:7504 005710 
030506 001410 
030510 032737 
030516 001410 
030520 005037 


CTRL PRTS 
-77 10:21 


030142 


001224 
030156 


001212 
001210 
001236 
001000 
0012S4 
033472 
ooo000e 


002316 
00000e 


002322 


ooooo1 
002336 


C10 
MACYIT SBIAGNOSTIC READ DATA OR DIAGNOSTIC WRITE CHECK ROUTINE 


001236 


001236 


1s0sSe 


150504 


001236 
001236 


002260 


002340 


nov #515, , SESCAPE ;SET RETURN TO CONTINUE TEST 
23: MOV STMP11,R4 ;RET RETURN FOR POSITION ERROR 
MOV #48, SESCAPE :SET RETURN TO CONTINUE TEST 
12$: MOV STMP11,-(SP) ;PREP STACK FOR RETURN 
BIT #8179, aSWR > TEST IF LOOP ON ERROR 
BEQ 14S :NO SKIP 
TST (SP)+ ;REMOVE LAST ENTRY FROM STACK 
CLR SESCAPE :NO LOOP - SLEAR ESCAPE 
13S: 
MOV CSP Da° RS POP STACK INTO Ra 
MOV (3P}SRT FOP aTAe K IN 18 Ri 
MOV (SP)4;R ;;POP eTACK INTO RO 
14S: RTS RY 
20S: mov STHPY, RY ;GET RETURN FOR ECC ERROR 
21$: MOV FAp3 RY ;GET_CS1 ERROR RETURN 
188: It 779, SSWR That fe LOGS & eon 
BNE 183 ; ives - i 
MOV TESTN, RO G TERS T OP ON ERROR OR 
ere iPec Ape 4a NEXT TEST. 
MOV SSWOSTB(RO), SESCAPE SET oP TO ESCAPE TO NEXT TEST 
APE T 
BRe eat BRIT iro 
+ ith eee i fee of BOR UTI LE cc Isc ATED FOR THE 
PIG rere aera nearer Pi a 
3% THE co cur AT TEN Ae BER CED Fs HE At ans ERA: THEE cou SRdER 
:% 11 BITS OF ECCHI ARE PLACED IN E.ECPT FOR EASY COMPARISON 
i TO RKECPT. 
1H CALL: PC ECCGEN 
* a Ce baN: a7 RY’ 
ECCGEN: MOV RO, -(SP) 
MOV uP BIT, RO sare RE ODRES OF NEXT BIT 
BIT epiT1,L CS1 i CHECK ri ITING 
BNE 
MOV #M1.BIT,RO * ELSE CRBNGE TO PRESENT BIT 
12S: TST (RO) ;CHECK IF NEXT BIT O 
BEQ 3$ ‘YES - SK IP 
BIT #1,ECCHI :NO, CHECK IF BIT 31 = 1 
BEQ ?NO, SET ECC XORED BIT 
1S: CLR ECCXOR :CLEAR ECC XORED BIT 


SEQ 0113 


CZR6EBO RK611 DSKLS CTRL PRTS MACY11 30(1046) Oe2-DEC-77 10:43 PAGE 120 SEQ 0120 
CZR6EB.Pi1 O02-DEC-77 10:21 GENERATE ECC WORD 


euba a BB85 74 R75 SHEP? fh ecc’ Bir 
640S 


000001 002340 3S: Bit #4 ,ECCHI i CHECK beh ope XORED aIT 


6408 000001 002336 SS: MOV #1,ECCXOR eet ECC 

Ht is : 7s: BBR geen icicle 

41 BOS 3u5 ; ROR CCH 

eui2 1. 3 002336 rst ECCXOR ;CHECK IF XOR NEEDED 


1 NO 
920020 v 1Fristerty, -(sp§ ;60 XOR OF ECC BITS 
34e 23 


Haat dy, eccid 
CBr thE, - csp) 


Cc ECCH 
C 
S 
C 


pat Baier eras aeeET o0e34e ne 


ae ee oo =| 


137 002340 O022eS4 10S: MOV 
' 732 174000 O0eeS4 Roy 


satay ECCHI 


Rae gee gare 


cor 
EP = 
~Oo 
fone 


es 


pues RETURN 
427 .SBTTL E T MA 

-& 
r ay of aA of i tata" the CORTEN FQ08 
4 14 is COMPUTE! DELAY MAINTENANCE 
6430 :% GOED WRITE, DATA) FoR THE PROPER THANSITE 
6431 i CHECKED AT EACH T ON. ne rr 
pass fF 
y 3% 
6435 7% 
ce Rhine BPE BESTT cn uo cro run 
ed is Rte pk ESR BRRBa TN AL 
6439 030652 052737 o02400 o02244 WRTBIT: BIS #MCLK!MEWD,E.MR TE. EXPEC D MAINT. REG. 1 
6440 030660 012762 O00440 O00026 MOV BONDS MCLIC AKT CRB CORBY ay 1s UPWARD TRANSITION 
644 5237 26 MOV RKMRi(Re).T.MRI ; INT REG. 
44, 7 44 2204 che .MR1,T.MRI ; CHECK nA NT REG 1 CORRECT 
eu 030704 12799 030724 001236 sat #1, SESCAP ‘ CAPE FOR L ONE RROR tO 
64 020716 018737 043644 0015i2 MOV SenL EMuiee : Ae) ne Sate 
64 7 11646 MOV (SP), -(SP) 
pi? 030722 000207 RTS PC pave INEORRECT ON UPWARD TRANSITION 
644 77 001000 150206 1S: BIT #SW9, ISWR ;CHECK IF LOOP ON ERROR 
64 830383 Bai 402 BEQ 35 (CT H CONTINU 
pub 34 000137 031606 . IMP 63S :YES, LOOP ON ERROR 
6453 030740 042737 O14400 o02244 35: BIC WNCLK!PCALPCD,E.MRI ; INITIALIZE MAINTENANCE REG. 1 
64S4 052737 002244 BIS #MEWD! WRTGAT,E. MRL 
645S 030 005737 002320 TST T CHECK TF ONE 
6 0307 1 BNE ?YES, SIMU 
64S 07’ 737 02322 TST Mi.BIT :CHECK IF BRE VIOUS ONE 


6458 030766 001023 BNE 10% :YES, NO TRANSISTION 


ce HED Stlce had PBEM PP nel ee anne TMon de . 


ceneeee els DSKLS CTRL PRTS 





CZR6EB.P11 -DEC-77 10:21 
6459 042737 o02000 
B460 ; 687 002316 
pe Bike tare Oa 

464 ib} 45 010000 
aaa 

i ae be 
64639 0310 004000 
eu) Oat Goy0ze 
ba7e 1 

647 1 

6474 1 031102 
6475 O31 043732 
64 1 

64 ll 

64 

64 0314 001000 
6 111 1408 

b4 031112 000137 031606 
64 031116 37 

cies SBS BHR7e2 BREING 
6485S 031132 O16e 000026 
5486 O31140 002244 
648 il 1416 

6488 031150 012737 031170 
6489 031156 012737 o44022 
cay Gaile BAdeo? 

b433 031170 032777 001000 
piss G31208 BBLI95 oaseoe 
bis lt: Ere pastes 
6499 631255 Ois7es 040 
6500 O3le2e6 Ol6b2 

6501 1234 3737 002204 
6 1e4e nite 

6 1e44 0127 031264 
b504 g31 o1e737 044110 
b5oe 83} BaaSos 

6508 031264 032777 001000 
6509 1272 114 

6510 031274 037 001236 
6511 031300 2716 o0000e 
b51¢ 031304 00020 

6514 031306 005737 002316 


od2e44 
o0000eE. 
002204 
00e2e44 
001236 
001Sie 
150030 


oo22e44 
000026 
002204 
002204 


001236 
001Sle 


147742 


147646 


Ss: 


10$: 


118: 


12S: 


13$: 


15S: 


17$: 
183: 


20$: 


+ 23e 
<OoOw on We<c< 


OnmnH 


MOV 


O33200 +00 Ds 


E10 


-77_ 10:43 PAGE 
T OF WRITE DATA I 


SMEWD,.E.MR1 
-BIt 


sEMWG , EM 
(SP), -(SP) 
PC 

#SW9, JSWR 
63$ 
SESCAPE 
#e, (SP) 

PC 


P1.BIT 


a 
a 


INTANENCE MODE 
ATE TRANSISTION 
NE 


On = 
mG 
on 
xX KO 
fad 
v1 
x< 
+ 
wo 
4 


wars: 
Q- mu 


Paes 


Geo 3 
& 
5: 


ey a 
a8 {neo 888 8 
ch 
=e a 
R” 3 3m 
wo 


. Se See es wees Stee ee wees 


a 


i: 


UPWARD TRANSISITICN 


prec TED MAINT REG 1 
DE 
T REG. 1 


T REG. 1 CORRECT 
OR LOOP ON ERROR 


=—a~-0O Mm 
-m 
D 
= ih 


ie 
3 


VE RETURN 
mR ORRECT 


;CHECK IF LOOP ON ERROR 
;NO, CON 

:YES, LOOP ON ERROR 

;RESET TRANSITION INDICATION 
3S Y LAST PART OF DATA 

5 STORE MRI 


5 CHECK IF MRL CORRECT 
>LOAD BECHPE FOR LOOP ON ERROR 
*LOAD ERROR MESSAGE 


SAV N 
?MR1 INCORRECT 


;CHECK IF LOOP_ON ERROR 
*YES, LOOP ON ERROR 
:CLEAR ESCAPE 

‘ADJUST RETURN 

: RETURN 


;CHECK IN NEXT BIT A ONE 


- 
—_ 
Lo 





SES Ole21 


F10 


6569 i DONE BY THIS ROUTI 


11 OSKL Y (1046) -DEC- 10:4 1 SEQ O122 
CZREEBO RK611 DSKLS CTRL PRTS MACYI1 30(1046) O2-DEC-77 10:43 PAGE 122 
CZR6EB.P11 02-DEC-77 10:21 SIMULATE ONE BIT OF WRITE DATA IN MAINTANENCE MODE 
6515 931 12 1 NE 30S sYES. CHECK PRECONP DELAY 
651 1314 002322 ST M1.BIT + CHECK BR pRECONP ADVANCE 
651 1 415 BEQ 40$ :NO HECK FO MRI 
651 1 737 oo4000 002244 BIS #PCA,E.MRI :Set COMP. ADVZNCE 
6 1 il BR 40$ :CHECK MRI | 
6 1 002244 30S: IC anc K,£.MR1 RESET MAINT CLOCK IN EXPECTED MP1 
pest B31 533 poo sBe eis ieit C FOR PRECOMP 
6523 1 BNE NO HECK MR 
6 1 919000 oo02244 BI oD, PCO, E MRi :SEt PREC DELAY 
6 1 1 000026 40S: MOV MRI(R2) ;CLOCK IN DATA BIT 
6 1 be 900986 002204 MOV RUNRI Che T.MR1 8 MR1 
6 1 002244 CMP T.MR1,£.MR ;CHECK MRI CORRECT 
6 1 414 BEQ 425 :YES OCK IN REST OF BIT 
6 1 1 931420 001236 MOV #41S, SESCAPE :LOAD ESCAPE FOR LOOP ON ERROR 
6 1 1 3732 0015Sie MOV BEMWS , EMW+ ; LOAD MESSAGE 
6531 1414 O116 (SP), -(SP) :SAVE RETURN ‘ 
6 1416 RTS PC :MR1 INCORRECT 
6 
6 14, 001000 147512 41S: BIT 8 aSwR :CHECK IF LOOP ON ERROR 
6535 $3182 ee 5 BNE e33° : >YES Lor ON ERROR 
6 031430 00 goeeus 42S: BIS #MCLK,E.MR1 * CHREA EXPECTED MAINT. REG. 1 
6 0314 1 40 0026 MOV SOD" Ck, RKMRI (Re) «PROV DE UPWARD TRANSITION 
Peas Batues geese, Bougee OSSoN HOY KTR CRED TAR 5 Ore TNT eed 1 CORRECT 
cee BID BOLI orcs oz 6B Siasasescore ite PSE 
654, 031470 Bist 32 o44022 001Si2 MOV HENS, Emu+2 Lap MESSAGE 
654 14 O1l6 MOV (SP), -(SP) :SA TURN 
boys B3i¢08 boasoe RTS PC ?MR1 INCORRECT 
65 1 77 001000 147430 43S: BIT sCHECK IF LOOP ON ERROR 
& a9 11 apts BNE <r Seana ives LOOP _ON ERROR : 
6548 151 oo2400 002244 4SS: BIC WO! MC Ky 3MRl - Set IST 
6549 1 1 000040 o00026 MOV #DMD, RK ;LOCK TRANSISTION 
B550 1 ibe goee04 MOV RENRI CRE). ER fri ;STORE MR1 
655 1 3 oo2204 CMP T.MR1,E.MR i CHECK abt MR1 CORRECT 
65 1542 OO1414 BEQ 50S ;YE TURN 
655. 1544 127 031564 00 MOV #475, SESCAPE ?LOAD ESCAPE FOR LOOP ON ERROR 
6554 15 12737 O44110 O01Sle MOV #EMW4, EMW+2 ?LOAD ERROR MESSAGE 
6555 1 011646 MOV (SP), -~(SP) ;SAVE_ RETURN 
b556 1 07 RTS PC :MR1 INCORRECT 
6558 1564 777 OO1000 147346 47% BIT #SW9, ISWR ;CHECK IF _LOOP_ON ERROR 
6559 O3is72 001005 NE 635 :YES. LOOP ON ERROR 
6560 1574 7 001236 SOs CLR SESCAPE CLEAR E 
6561 031600 062716 oO0000e ADD #2, (SP) tADJUST RETURN 
b5be 031604 07 RTS PC : 
6564 031606 012706 001100 63S: MOV #STACK, SP ;FORCE STACK 
b5b5 031612 000177 147272 IMP aSLPERR tLOOP ON ERROR 
6567  SBTTL SIMULATE ONE BIT OR READ DATA IN MAINTENANCE MODE 
6568 ONE BIT OF DATA IS 15 BEAD SIMULATED. NO CHECKING IS 


CZR6EBO RK611 OSKLS CTRL PRIS 
cz 0e- 


R6EB.Pil 


C-77 10:21 


SReRs. 
Tee 
Suis 

RR 
8 § 


1 
1 
1 
1 
B31 
1 
6S 164 00 oue 
6$81 B3ies0 BOOoY 
6582 031656 Ole7be ne 
fees Baless 
1672 
SEE casey pire coo 
6587 B31702 Ole76e O00040 
6588 031710 OQOle76e 001440 
pees Bai 218 01276 
65 17e4% 00020 
6591 
6S 
6593 
6594 
6595 
6596 031726 012737 031742 
6597 1734 0116 00231 
6$38 1740 1 
6599 03174e 005037 001236 
gO O31758 01001 001000 
fen lees Bias 
ear 1760 7 001100 
6605 B31964 177 =: 147120 
6608 needy “thier 046632 
pit Bai7re Biszor 000400 
gi ae ee 
cid Gans lect 
6615 B32012 0204 
6616 
6617 
6618 
peda 2014 
2014 010046 
cel Gees Sidi 
sess facies Blasts 
Hes Gates Bie guess 
66e6 032034 Oel¥e7 000001 


MACY11 


001236 


147164 


(1046) 
IMUL 


G10 


02-DEC-77 743 =P 123 


ATE ONE BIT OR READ DATA IN MAINTENANCE MODE 


32 
-% 
RDBIT: 


10S: 


15$: 


. SBTTL 
CLRIBF: 


18: 


. SBTTL 


Ted 


-% 
BLODAT: 


CALL: JSR PC,RDBIT 
TURN: RTS P 
TST PR.BIT 


A ag 
10$ CATE ONE 
ist ml. .BIT ie gat VIOUS US ONE 


MOV #OMG!MCLK, porn iS INSERT TRANSITION 
BR se ‘ Bock ER’ spgcrer 

MOV #OMD!MCLK! RO, RK (Re) INSERT TRANSITION 

MOV #OMD. RKMR I ( 2) “CLOCK IN ZERO 

mov #OMDENICLK KM BR ( (Re) 

RTS Be o, ; RETURN 


MOV #DMD!MCLK,RKMR1(R2) ;CLOCK IN ONE 
MOV #O0M0. RKMRI 

MOV 

RTS PC ; RETURN 


Y CK ENABLE TRAP 
TF THe PROCESSOR IN USE HAS MEMORY PARITY OPTION 


I WILL a pENABLED. THIS ROUTINE WILL PROCESS TRAPS CAUSED 
Vv MORT IDS” Sc ORS. LOAD ESCAPE 
v (SP); TRAPPC Re PORT R 

ERROR 1 e T eet PARITY ERROR 

Gf HEiS"SEam HEBER GF Cope ow ennor 

Ene fe¢ . ee dhck® Fach BRB TRY AGAIN 


wee SETBBaS? 


CLEAR neve BUFFER 
MOV nai af 


ipa TIALIZE STACK 
?LOOP ON finde 


mov ;GET BUFFER POINTER 
MOV Slag’ an ;SET colt eRe CLEAR 


c R (Roo+ :6 EAR BUFFER WORD 
BNE 1$ ;LOOP UNTIL COUNT IS ZERO 
MOV (SP)+,R1 i RES TORE 
R4 
BUILD DATA BUFFER 
THE PATTERN SPECIFIED IN THE CALL IS LOADED INTO THE DATA 
BUFFER. THE ENTIRE BUFFER IS ALWAYS LOADED (400(8) WORDS). 
MOV RO, -(SP) ;sPUSH RO ON STACK 
MOV R1;-(SP) :PUSH R1 ON STACK 
MOV R3,-(5P) : PUSH R ON STACK 
MOV R5’-(S5P) +?PUSH RS ON STACK 
MOV #OBUFF , RO :LOAD RO TO POINT TO BUFFER 
MOV #400,R1 :SET DATA LENGTH 
CMP (RY)? #1 :TEST IF PATTERN 1(ALL ZERO) 


SES 0123 


CZR6EBO RK611 OSKLS CTRL PRTS MACYI1 30(1046) O2@-DEC-77 10:43 PAGE 124 SEQ 0124 
CZR6EB.P11 O02-DEC-77 10:21 BUILD DATA BUFFER 


1S: ER tho+ iPPse Sktbr opurr 
301 DEC Ri 
6630 001375 BNE i$, 
peas 484 00007 2S: MP +88) a7 ;TEST IF PAT 7 (ALL ONES) 


3$: MOV 


iE 
Rugs 


ee 
sae 


BNE 4 ;NO SKIP 
177777 MOV a177777 R3 ;ELSE SET BUFFER TO ALL ONES 
RS, (RO)+ 


4$: ; TEST IF PAT & (COMPOSIT ROTATING) 


40 100 ; SKIP 

44 eat 046572 HOV ¥PQTe, RS ; ofb  BOPPBRSS OF PATTERN 6 
b643 110 021427 oo000S S$: cne £R4), #5 j TEST IF PATTERN S (ALT 1 8 O) 
Bb? B3etig 13908 125252 - MOV slesese R3 PSE Loan OBUFF WITH PAT S 
Bb47 : $301 : DEC . 
Bese B18 Bhs Be 
66 i 14 oo00004 7$: CMP (RAD, a ; TEST IF PATTERN 4 (HI-LO FREQ MIX) 
pps 36146 046532 Rov sPaT4, RS MB a5 BOINTER WITH ADD OF PAT 4 
6654 032146 021427 000003 as: cne (RA), 43 ; TEST IF pat 3 (MAX PRECOMP PHASE MIX) 

; a4 635126 B01983 046472 MOV #PAT3,RS LOAD BOINT R WITH ADD OF PAT 3 
444 535/68 046432 9$: RBy 18 T2,RS ; PAT 2 
sere faeise giecen OO 98: BY Bs sFteose Faby BATTER. OF Sale 
+ ' ’ ; 
B33 DEC Ri iDed COUNTERS 

6664 p36 12 oe 047636 EG La FF RS i LOOP ANTAL PART ce BorFER 

Ss O38 o S20 12$: mov &R }+, (ROD+ i REPEAT PATTERN THROUGH BUFFER 
eee? le 1375 B 125 
6668 Oaee18 Boe 24 13$: TS (RY) + ;BUMP PAST PARAMETER 
6669 O3e216 012605 MOV (SP)+,R5 :;POP STACK INTO RS 
6670 O32220 012603 MOV (SP)+,R3 ::POP STACK INTO R3 
pb71 Oseece O1260 MOV (SP)+'R1 ::POP STACK INTO Ri 

7 01260 MOV (SP)+;RO ::POP STACK INTO RO 
b673 032226 Oo00204 RTS RY 
67 .SBTTL LOAD “"L” R TERS 
ie TP sheet tne ea, ob BSDRD ONG SMR. patt 
6678 i AND L.CS1 IS LOADED WITH THE COMMAND. ; 
6680 : CALL: 
6681  % ISR R4, LOADRK 
6682 1% . WORD CYLINDER 


CZR6EBO RK611 OSKLS CTRL PRIS 
CZR6EB.P11 Oe-DeC-77 10:21 


6683 
6684 
ats 
eee? 
6688 
6689 


o00 
DONE EEE 
GIGI G) 
NNNN 

; 

o 

<= 


8 


Sse SRR LORS 
S| 
ee 
3 


Z 


RN A a aa an 


sdaggas 
GEQGOuE 
aaanaar 
8 
g 


Ww 

~ 

o 
oO0000000 
ae ey errr as 


COOOrrrrrrccc 
NNNNNNNNANNSN A 
a ee he pe ee ee 

Ste 

oe 


OWONOU£ WO 


002160 
000011 


oo 
NN 
ary 
oo 
3 
RaNRe 
8 0000000 
BBaReeees 
Ww 
3BRgS 


oooo04 


2 


R 


OWWWW 
WNNNNE 


eele 
Oeei4 
002206 
002210 


oO 

“I 

8 
oO00000 
a aT ar ar ae 
POS 


MACY11 30(1046) 
LOAD “L 


002276 


ooo0ce 
000004 
000020 
000006 

0010 


00026 
000016 
000000 


LOADRK: 


1$: 


T10 


O2-DEC-77 10:43 PAGE 12S 
” REGISTERS 


. BYTE ; SECTOR 
“BYTE : TRACK 

“WORD :BUFFER ADDRESS 

“WORD :WORD COUNT 

“WORD !COMMAND, FORMAT,DRIVE TYPE,8UPPER BUS ADDRESS BITS 
RETURN: 

RTS R4 

MOV (R4)+,L.DCYL ;LOAD CYLINDER 

MOV (R4)+°L-DA : TRACK AND SECTOR 
MOV (R4)+'L.BA : BUS ADDRESS 

MOV (R4)4°L.WC : WORD COUNT 

MOV #OMD, 0. MRI :SET DIAGNOSTIC MODE 
CLR L.ASOF :CLEAR OFFSET 

CLR L:cS2 :CLEAR CS2 

MOV (R4)4,L.CS1 ; LORD cS 

RTS RY RETURN 

START THE OPERATION 

THE INFORMATION IN THE “L™ REGISTERS ARE LOADED INTO THE 
RK611 REGISTERS IN A STARAIGHT TRANSFER. 

MOV L.WC,RKWC(R2)  ;MOVE THE “L”REGISTERS INTO 
MOV L.BA RKBA CRE) ‘CORRESPONDING RKb11 REGISTERS. 
MOV L.DC¥L, RKDCYL (Re) 

MOV L.DA, RKDA( Re) 

MOV L.CSe, RKC (R2) 

MOV L.MR1’RKMR1(Re) 

MOV L.ASOF , RKASOF (R2) 

MOV  L.CS1,RKCS1(R2) 

RTS R4 

GET THE RK611 REGISTERS 

ALL THE RK611 REGISTERS EXCEPT THE DATA BUFFER ARE 
STORED IN THE “T" REGISTERS. 

MOV RO, -(SP) ;;PUSH RO ON STACK 

MOV R1'-(5P) ::PUSH R1 ON STACK 

MOV R3;-( SP) ::PUSH R3 ON STACK 

MOV R2;RO :GET RK BASE 

MOV #T°CS1,R1 :GET START OF REGS 

MOV #11,R3 :SET COUNT 

MOV (ROS+, (RL)+ :GET CS1 THRU DCYL 

BNE 1s ;LOOP UNTIL DONE 

ADD #4, RO ;SKIP_OVER DB AND SPARE 

CLR (RL)+ :CLEAR T.DB 

MOV (RO)+, (R1)+ :STORE MR1 

MOV (RO) +, T.ECPS : ECC POSITION 

MOV (RO)+)T.ECP : CC PATTERN . 
MOV (RO)+°T MRE ; MR2 

MOV (RO)+;)T MRS : MR3 

MOV (SP)+°R3 !;POP STACK INTO R3 


SES O1es 


keneeeo., ve OSKLS CTRi PRTS 
CZR6EB.P11 


O2-DEC-77 
6739 032436 012601 
6740 O3e440 012600 
6741 O3e442 000204 
6742 
6743 
6744 
6745 
6746 
6747 
6748 
6749 
& 
6751 
675 
67 
6754 
6755 
6756 oO32444 
6757 O3e444 010046 
6758 O3e44— 010146 
6759 010446 
e761 Daeve4 Giaru0 
67 15701 
676 4 030003 
6764 001401 
6765 050104 
6756 72 006300 
6767 O3e474 001403 
6768 000241 
6769 008001 
6770 70 
6771 032504 010403 
6772 032506 O12604 
6773 0325190 O1e601 
6774 O3e51e 012600 
6775 032514 000204 
6776 
6777 
677 
6780 032516 012737 
6781 O325e4 012737 
67 se 012737 
67 005037 
6784 44 012703 
EP Be 12704 
Gee passa gigz0s 
6788 032560 71 
6789 050437 
6790 062703 
6791 57 C241 
6792 032574 O06104 
6793 032576 001366 
6794 032600 000406 


10:21 


ocooo1 
100000 


032602 O00004 
000340 O00006 
000000 002334 


002332 
172100 
000001 
000001 


002332 
o00000e 


MACY11 301,096) 


J10 


O2-DEC-77 10:43 PAGE 126 
T THE RK611 REGISTERS 
MOV (SP)+,R1 ;;POP STACK INTO R1 
MOV (SP)+'RO ::POP STACK INTO RO 
RTS R4 
.SBTTL TERS? SHALL coe LAST L BE FIRST” SUBROUTINE 
:% THE CONTENTS OF R23 1S SWAPPED ND FOR END, I.£. BIT 1S 
;* BECOMES BIT 0 AND V VERSA,BIT 14 BECOMES BIT 
i 1 AND VICE VERSA, 
;* CALL: 
tH ISR RY 
i WITH R3 LOADED WITH THE WORD TO BE SWAPPED 
;* RETURN: 
ta RTS RY 
1 a WITH R3 SWAPPED. 
FSBLVV 
MOV RO, -(SP ) ;;PUSH RO ON STACK 
MOV R1;-(5P) ::PUSH R1 ON STACK 
MOV Ra, ~¢ ) ::PUSH R4Y ON STACK 
CLR RY :CLEAR R4Y FOR SWAPPED WORD 
MOV #81T0,RO :SET FOR BIT TEST 
MOV s1716, Ri :SET FOR BIT SET 
1S: BIT RO,R3 :TEST IF BIT SET 
BEQ 2s :NO_- SKI 
BIS R1,R4 :SET CORRESPONDING BI BIT 
2s: ASL RO :SHIFT FOR NEXT BIT TEST 
BEG 3$ ;LAST BIT TESTED - YES - EXIT 
CLC :CLEAR CARRY 
ROR Ri :SHIFT FOR NEXT BIT SET 
BR L$ > LOOP 
3S: MOV R4.R3 :STORED SWAPPED WO 
MOV (SP)+,R4 :;POP STACK INTO RY 
MOV (SP)+'R1I ::POP STACK INTO R1 
MOV (SP)+'RO ::POP STACK INTO RO 
RTS R4 
.SBTTL CHECK FOR MEMORY CHECK ENABLE 
PARCHK: MOV #20$, ERRVEC ;SET VECTOR FOR MEMORY PARITY CHECK 
MOV #PR? RRVEC+2 
MOV AR ;LOAD GOOD PARITY 
CLR MEMPAR :CLEAR FLAG 
MOV #MEMBAS , R3 ; LOAD REGISTER TO DETERMINE IF 
MEMORY CHECK EN NABLE AVAILIBLE 
MOV P INITIALIZE MA 
16S: mov span. EN, (R3) ?ENABLE MEMORY CHECK 
BIS RG MEMPAR ;SET FLAG 
ti 
ROL ;CHECK IF FINISHED 
BNE es :NO, SET UP NEXT MEMORY PARITY MODULE 
BR 383 :RESTORE TRAP VECTOR 
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EgReERO RK611 OSKLS CTRL PRIS 
-Pll 10:21 


Oe-DEC-77 1 


neque 


1 
04 
1357 


sy 


ooo0de 


oo000& 
000008 
002332 


ae 


000116 
000116 


89 
any 
ne 


ooo004 
000006 


oooo0& 
003776 


033052 
177572 
100000 
A763 30 

0010 
077406 
000200 
177600 
033010 


MACY11 30(1046) 
CHECK 


000004 


000114 


oooco4 
032710 


177740 


ooo004 


K10 


02-DEC-77 10:43 PAGE 127 
FOR MEMORY CHECK ENABLE — Saw 
% 

20S: CMP (SP)+, (SP)+ sADJUST STACK ” 9 

ADD #2,R3 

ROL RY ;CHECK_IF FINISHED 

BNE 16S !NO, GET NEXT LOCATION 
225: Mov sERRVECS2, ,ERRVEC’ ;RESTORE TRAP CATCHER 

TST 5 CHECK IF MEMORY CHECK ENABLE AVAILIABLE 

BNE 2ss RETURN 

MOV #MEMVEC+2, MEMVEC’ ; VRESTORE TRAP CATCHER 

CLR MEMVEC+2 

TS RETURN 


ess: R PC 
-SBTTL ROUTINE TO SIZE MEMORY 
°° gpg anced ai 0 eat 


 kCAL 
is JSR PC, SSIZE 
HASLSTAD WILL manag 
* i OPTION -- LAST VIRTUAL ADDRESS OF THE LAST BAN 
: WaT KTit OPTION -- LAST ABSOLUTE ADDRESS OF AVAILABLE MEMORY 
?*$LSTBK WILL CONTA N THE LAST BANK AS A SAF 
:%$KT11 IS THE MEMORY MANAGEMENT KEY 
:*BITO7 = 0 DON’T USE MEMORY MENT 
: T BE se BEF THE CALL 
‘*BITIS = 0 DON’T HAVE MEMORY MANAGEMENT OPTION 
1 a TERMINED BY ROUTINE 
$SIZE: MOV RO, -(SP) SME STACK 
MOV R1,-(5P) ;;SAVE Ri ON oN Tt STACK 
MOV Re, -(SP) ON THE S 
MOV R3.-(5P) HERVE B THE Tac 
MOV S¥ERRVEC C,-(SP) at RROR VECTOR PS & PC 
MOV QBERRVECS2, -(SP)° 
MOV SP RQ -SAVE THE STACK POINTER 
;;SET THE ERRVEC PS TO THE PRESENT PS 
TR 0 PUSH OLD PSW AND PC ON STACK 
MOV (SP)+, QBERRVEC+2 -:SAVE THE PSW IN a#ERRVEC+2 
MOV #3776_R1 ; ; SETUP RODRESS 
TSTB (PC)+ is MEMORY MANAGEMENT? 
$KT11: .WO! 200 5B TO OSE MEMORY MANAGEMENT 
BPL SCORE IF NO 
MOV WSKTNEX, JSERRVEC’ ; T FOR TIMEOUT 
TST aeSRO 1 YOU THERE? 
BIS #100000, $KTi1 tt VES--SE KTi1 K 
CLR -(SP) :INITI 1ZE FOR. "PAR" ES aR LOADING 
MOV #KIPARO, R2 +i AN ORES FIRST “PAR” 
MOV *:LOAD EIGHT “PAR. ’S” AND EIGHT “POR.’S” 
1S: MOV #77406,-40(R2) ::POR = 4K, UP, READ/WRITE 
MOV (SP), (R2)+ ?:LOAD “PAR” 
ADD #200; (SP) ;;UPDATE FOR NEXT “PAR™ 
SOB R3 1 LOOP UNT L ALL EIGHT ARE LOADED 
MOV #177600, -(R2) : SETUe KIPAR7 FOR 1/0 
CLR -(R2) P KIPAR& FOR TESTING 
MOV #25, J¥ERRVEC + ETCH TIMEOUT IF NO SR3 


ESREEB-PIi Ge-DEC“7? 10:21 


6851 


eee 


BERR RER Rae 


eb 


FENVOT LUNES LORE 


oo0000 
WWWWt) 


316 
33160 
033162 
033170 
033172 


033174 


Bs 


855548 

43776 
098048 
172356 
177872 


100000 
033110 


4000 
40 


177776 
004000 
ooo040 


wy IIS 


rv 


Oo 
qeeaaS 


Bae 


aS 


oooo04 
033154 
nih 033156 


Oeeee ee err 


QOOO000000000r-— 


104407 
032777 040000 
001131 
000416 
013746 OOO0004 


MACY11 30(1046) EC-77 10:43 PAGE 128 
ROUTINE TO SIZE MEMORY med pera 


172516 


ooooo4 


032710 
ooo004 


145750 


OUT INE 
Mov mm ae gee. RES — 
2s: MP (SP)+, (SP)+ cts Te STACK=- neh 
3S: INC aaSRO 
MOV SK TOUT DSERRVEC’: - SET Poa t Tae oO 
4$: TST #1437 726 Heep Be ON NON-EX=RE 
ADD #40 (R MAK 1k STEP 
CMP akip ?, (R2) LAST _ONE? 
BHI : ::NO--TRY IT 
SKTOUT: MOV (R2) ,R2 tIGET LAST BANK+1 
CLR aasRd :: TURN OFF MEMORY MANAGEMENT 


BR tees 
SKTNEX: BIC ,» SKT11 33KT1 pate PS 
SCORE: MOV $SCROU , OWERRVEC  ; ,SE ub TIMEOUT 


1S: ‘ Ri i$ INCR MENT BY 1K 
ye 
CRP b a R1 1 Rae ON TIME ee 
BNE Hl ::NO--TRY AGAIN 
SCROUT: SUB #4000,R1 
$SIZEX: gue #40, Re ; DROP K see 
nov Se 3, guenavece2’ } RES PaROR VECTOR 
MOV Ri seSTaD. ;;LAST ADDRESS 
MOV Re’ $LSTBK ‘heer BANK 
MOV (SP)+,R3 STORE R3 
MOV (SP)+) Re RESTORE Re 
MOV (SP)+/R1 iB ST Ri 
nov (SP )+,RO STORE RO 
$t Tek: ii WORD F ee RAINS THE cast BANK >> 
. SBTTL HANDLER ROUTINE °° 


Tk ge hh tbat th al led gta hal 
ihr aN ROUTINE Test WILL INCREMENT 
TNM) NT8 “THe b Tate REG. (DISPLAY<7:0> ) 


aN ae hats Sofia Peet As 8 pisPLAY 


ake yg i is earns 


IN SWR<7:0> 
SSCA 
:% SCOPE 3; ; SCOPE=IOT 
SSCOPE: 
K ;;TEST FOR CHANGE | IN, SOFT- SWR 
1S: BIT #81T14, aSWR +;LOOP_ON PRESENT 
BNE SOVE 2:YES IF SW14=1 
waueuSTBR OF cébe FOR THE XOR TESTERSeaes 
éxTs 3 ;IF RUNNING ON THE oXORT TESTER CHANGE 
ti turs INSTRUCTION TO A” NO 


P=240) 
MOV @#ERRVEC,-(SP) ;;SAVE THE CONTENTS OF THE ERROR VECTOR 


| CZR6EBO RK611 OSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 129 SEQ 0129 
CZR6EB.P11 O02-DEC-77 10:21 SCOPE HANDLER ROUTINE 


baeg faieee guera? 999868 0°00™ ny SSERSEGE’ Fine Or ona 
1 MOV (SP)+, J#ERRVEC ST THE ERROR VECTOR 
£316 Baaste Rages 0000 BR. $2vcab i RE 10 Fue NEXT ‘ete . 
i 1) eee ee ee 
6914 6%:;#8888END OF CODE FOR THE XOR 1 {k00, ON TH 
pale Bs35%8 930727 ooo400 145702 BIT 991708, aSUR bate Wooree TEST? 
6917 o0So046 CLR -(SP) 33C Poe oe tBep 
pale Basie bras 15672 mre germ ET SSEHESY sored a 
bast Bees Dpeciy 002 eS) EC OP ee tr oF nance 
ee ties? 001102 " M (SP), STSTNM $3 He Pg NNUMGER 
bases Boe! ASL He T ebb se HUMBER AS BN INDEX 
5a bisiee bai 106 OV arias fake toa BODRESS 10 = To DESIRED Test 
pees sf gS: ae, (SP) 33 BAD TEST NUMBER OFF OF THE STACK 
6525 105737 001103 es: TSTB SERFLG thas AON v: OR OCCURRED? 
6930 033306 001421 BEQ 3S 
bai baat igrore 001115 001103 cnPe RMAX, SERFLG FBX, , ERRORS FOR THIS TEST OCCURRED? 
63 4 001000 145612 Bit 881703, SHR 5 FLOP ON ERROR? 
e335 ae Or a7a7 001110 001106 7S: Rov SLPERR, SLPADR piGR I Coup ADDRESS TO LAST SCOPE 
6937 105037 001103 4S: CLRB  SERFLG ;;ZERO_THE ERROR F 
63 033304 905037 001234 cLR STIMES i }CLEAR uc NUMBER “OF ITERATIONS TO MAKE 
p20 St 004000 145560 35: BIT #81711, aSWR i Iyer TERATIONS? 
6942 03336 001256 TST $PASS :;IF FIRST PASS OF 
Baua Bose3? 001104 N §Fonr one a TBS 
6945 37 001234 001104 cne STINES, SICNT HE NUMBER OF TERATIONS MADE 
ER ERNE BIE? ono00, oo1s0y is: fe Slowt | f/Be Ain TRNEcD the” PPR 8H euwren 
bays 033424 113737 Betibe see weeotans: hove svetn STESTN 1 SOuNT at R IN APT * yesope: 
+5 86 
aes Ue Bi f 2 Ge 
egec Basicq b15335 gee erst SOVER: Move yea aDISPLAY Sa to} RUMBE ERROR — 
B35 ube 0 3718 001106 mov SLPADR; (SP FEU UDGE E TURN ADDRESS 
6358 033470 003720 SIxCNT: 2000. ?:MAX. NUMBER OF ITERATIONS 
6360 347 3414 “WORD TST1+2 — 5; STARTING ADDRESS OF TEST 1 
61 474 4032 ‘WORD TST2+e ::STARTING ADDRESS OF TEST 2 
6962 033476 OO4444 ‘WORD TST3+e2 ::STARTING ADDRESS OF TEST 3 


N10 








CZR6EBO RKG11 OSKLS CTRL PRTS MACYI1 30(104%6) O2-DEC-77 10:43 PAGE 130 SEQ 0130 
CZR6EB.P11 02-DEC-77 10:21 SCOPE HANDLER ROUTINE 

6963 oososs .WORD TST4+2 ;;STARTING ADDRESS OF TEST 4 
pa? ie OD Tetese «=H LEYART ING GODRees SF TEaT 
5968 “WORD TST7+e :: START Ne ADDRESS OF TEST § 

| BSe rt “WORD Tetiie + STRAT Ne ADDRESS OF TEST 11 

Peg 7432 ‘WORD TSTie+2 3;START 38 OF TEST 12 

| §970 10160 ‘WORD TST13+e 3; STARTING SS OF TEST 13 
697 10706 ‘WORD TST14+e ;;START SS OF TEST 14 
e978 11434 “WORD TST1S+2 ;;START Ne 3 OF TEST 15 
ear tehie Heo Yaries =H STeRTING fpeees Se feet 19 
6975 01 S462 > WORD Tetbo+3 aT BRT Ng RDDRESS oF TE T 20 

| 8399 tyst4 “WORD Fersae5 EST ORT NG 3 OF TeeT 52 

. se *'8,8)c6 

| 6978 bt doe “WO Ee tt ST BRT PRES SF Teer 35 
ea0 biesz0 “WORD Tetaeee bETRRTING BbORESS OF TEST oc 
6981 16604 WORD T 1SEs8 33 TART ADDR! OF Teer 6 
b38e 17266 ‘WORD TST27+2 3: START ADOR' OF TEST 27 
698 17602 ’ TST30+2 ::START ROOF TEST 30 
Baas DeeS “HOR  Teraes8 SF STARTING ADDRESS OF TEST 32 
6386 1220 ‘WORD TST +s :: START ADOR OF TEST 33 
698 021550 ‘WORD TST34+ 3; START ADDR OF TEST 34 
6988 022104 “WORD TST3S+2 ; START ADOR' OF TEST 35 
6989 022460 WORD T36+2 :STARTING ADDRESS OF TEST 36 

REKRKKHRKEE . S tf C2 2 22m * oa 

ear ; jkteanniuentenensaasaseeceesseubianecerennanens Prtitttttit ttt) 
6992 si 
£333 03356 932777 001000 145344 SCOPIS: BIT #SW9, ISWR s CHECK IE LOOP ON ERROR 
p95 033578 105732 001103 oeg° SERFLG 5 CHECK F ERROR OCCURED 
6337 033604 013716 001110 ae, SLPERR, (SP) :GO° BACK TO BEGINNING OF LOOP 
6999 - SBTTL Rl COMMUNICATIONS ROUTINE 
7001 ,URPRRS ESO SESED EER DSRS INN N NNR N ENT bata fee 
7002 033612 112737 oo0001 o34ose $ATY1: Move & TO REPORT FATAL ERROR 
7003 033660 116737 000001 O340S54 §SATY3: HOVE a1 SHFLG i? 70 TYPE A MESSAGE 
2008 933630 112737 000001 o34056 SATYM: MOVB #1,SFFLG ;;TO ONLY REPORT FATAL ERROR 
7007 033636 O1004 MOV RO,-(SP) ; ;PUSH RO ON STACK 
7008 p33e36 010146 MOV Ri’ -(5P) *PUSH R1_ON STACK 
7008 ete nae 034054 Tore SHFLG SHOULD TYPE A MESSAGE? 
701 4339 000001 001270 CMPB BAPTENV, SENV } | OPERATING UNDER APT? 
7012 033656 1031 BNE :IF NOT: BR 
7013 033660 132737 000100 001271 B1Te #APTSPOOL , SENVM 5} SHOULD SPOOL MESSAGES? ; 
7015 B33P68 ees ooo0004 MOV 34 (SP) RO ::GET MESSAGE ADDR. 
7016 033674 062766 000002 oo0004 ADD 4(SP) UMP RETURN ADOR. 
7017 033702 005737 001250 1S: TST saécTvPe ii $EE IF BONE W/ LAST XMISSION? 
7018 033706 001375 BNE :IF NOT: WAIT 

| 


Bl 





7074 034070 913777 001102 145044 MOV STSTNM, IDISPLAY 1 ay TEST NUMBER AND ERROR FLAG 


 CZR6EBO RK611 CTRL PRTS MACYI1 3u¢ 046) C-77 10:43 PAGE 131 
ESReEB Prt Babe oS oS 10:21 COMMUNICATIONS ROUTINE 
001264 MOV RO, SMSGAD ;;PUT ADDR IN MAILBOX 
| 2s: iste Roots ::FINO END OF MESSAGE 
001264 SUB $MSGAD, RO ::SUB START MESSAGE 
ASR RO” }}GET PESSAGE LNGTH IN WORDS 
GBBEEE coxzso |= Ya ENBSABe: «HLL RPY"Yol Nae Rae 
BR ss’ 4 ; e 
o4 3766 3%: MOV a4(SP) 4S ;;PUT MSG ADDR IN JSR LINKAGE 
0004 ADD #2,4(SP) 54 SUNP RETURN ADDRESS 
77776 MOV 177776, -(SP) ;;PUSH 177776 ON STACK 
b5463€ — JSR Po, STYPE ::CALL TYPE MACRO 
+ ‘ 
034056 10$: TSTB SFFLG ;;SHOULD REPORT FATAL ERROR? 
001270 TST dE av RUNNING UNDER APT? 
BEQ 2s BR 
001250 118: TST SMSGTYPE i Einisnep LAST MESSAGE? 
0012S2 one 4S 5) SFATAL UE NORE ty 
00 000004 ADD #2, 4(SP) ov -BUMP RETURN ADDR 
001250 INC SMSGTYPE ssTELL Abt To TO TAKE ERROR 
fe ES Hat 
4 CLRB G ?:CLEAR_MES FLAG 
MOV (SP)+,R ::;POP STACK INTO R1 
Hoy (SP)+'R j POP STACK INTO RO 
MFLG: .BYTE O i tRESSG. FLAG 
SLFLG: -BYT 0 ::LOG FLAG 
SFFLG: -BYT 0 ::FATAL FLAG 
APTSIZE=200 : 
TENV=001 
000100 APTSPOOL =100 
7055 000040 APTCSUP=040 
7056 .SBTTL ERROR HANDLER ROUTINE 
7058 a et ETN TME ERROR FLAG AND THE ERROR COUNT. 
7059 fATHIS ROUTINE ofttt T THE ERROR FLAG AND THE ERROR COUNT, 
200 ;xSAVE T ok ITER NUE NUMBE BEN AND THE ADDRESS OF THE ERROR CALL 
7062 i THE gO ITcH OPT PROVIDED BY THIS ROUTINE ARE: 
7063 :*#SWIS=1 HAL on ERRO! 
7064 :“SW13=1 INHIBIT ER ROR TYPEOUTS 
7065 *5W10=1 BELL ON ERROR 
7068 ; #SWOS=1 LOOP ON ERROR 
206 :% ERROR N ; ;ERROR=EMT AND N=ERROR ITEM NUMBER 
7070 034060 SERROR: 
7071 O34060 104407 CKSWR ss TEST FOR CHANGE IN SOFT-SWR 
7072 034062 105237 001103 7$: INCB SERFLG ;SET THE ERR OR FLAG 
7073 034066 001775 BEG 7$ ‘DON’T LET THE FLAG GO TO ZERO 
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7075 034076 032777 OD2000 
6 1 14 
7 li potiis 
5008 118 011637 1116 
Fa BRIS fie ae 
| 
4y 
obese Baie 884997 
| 708S ise 104401 001245 
1 737 00000 
ieee Geist 1ge737 000001 
| 7089 034166 113737 001114 
| 7090 a 737 
| a: ee Boge 144730 
| 7095 O34210 100002 
| 3 1§ 
16 001000 
7 224 001402 
7100 226 013716 001110 
8 ee Bie oi 
71 1371 1236 
5 ioe 034244 022737 Saeed 
7108 2S2 001001 
710 4254 OO0000 
7108 034256 
7103 034256 oon002 
| 7110 
7111 
| 71le 
7113 
7114 
7115 
7116 
7117 
7118 
7119 
3160 343 
zie O3uses 137 11 
3} S76 fisro0 O 7405 
sie Gauss adezno Peabo 
7128 306 005300 
ride Geld BBeseR 
7129 034314 006300 
7130 034316 062700 001330 
| 
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145034 


144714 


oooo4e 


ERROR HANDLE 


1S: 


poe 


20s: 


6S: 
RTI 


#B1T10,aSWR 


BELL 
SERTTL 
(SP) SERRPC 


ag Be, SITEMB 
a5eh 


13, 3SWR 


TYPERR 
, SCRLF 


SAPTENV, SENV 


SITEMB, 21S 
PC, SATY4 


JSWR 
3 


#B1T09, ISWR 


SLPERR, (SP) 
SCAPE 


ESCAPE, (SP) 
#SENDAD, d#4e 
6$ 


ete ot 743 PAGE 132 


pe eeee xP 

33 RING 

COUNT THE NUMBER OF ERRORS 

;GET ADDRESS OF ERROR INSTRUCTION 


P_AND SAVE THE ERROR ITEM CODE 
pero IF SET 


TRI 
UB Megs sore 


in APT 

I T ERROR REPORT 

TEM NUMBER AS ERROR NUMBER 
T FATAL ERROR TO APT 


i 

HALT on 

; TEST oR a IN SOFT-SWR 
35 LO ten E ITCH SET? 
5 BR Soke Re 

a 


ae He TURN ADDRESS FOR ESCAPE 
TO-ACCEPT? 
NO 


ayes: 


5g MAME MEME EE HE HE HE HE ME HE HE He EEE RRR REE ERE EEREEE 
’SBTTL TYPE ERROR ROUTINE 

;NENTRY JSR PC, TYPE 
;#RETURN R 


Ts pt 
THIS ROUTINE USE 


Hate theca ie 


. 


a ee CONTROL BYTE“ (SITEMB) TO DETERMINE WHICH 


TATHEN Yaeo THE Benne TARE caning © 


| Ore HnE EELS UHRUNRENREKENOE KEE TEE MEER neenenne nn eE Eee 


+pE 


1$: ADD 


STSTNM, STESTN 
#177400, STESTN 


SITEMB, RO 
ST euBO. RO 

as 

RO 

RO 


RO 
#SERRTB,RO 


;SAVE_ TEST NUMBER FOR REPORT 
;CLEAR UNUSED BITS 
; ENTER ERROR mF 


ED BITS 
;FORM INDEX FOR ERROR TABLE 


;FORM ADDRESS OF ERROR ENTRY 


SEQ 0132 


CZR6EBO RK611 OSKLS CTRL PRTS 


CZR6EB.P11 O2-DEC-77 10:21 
1% ARO RGR co 
ae i 
rs e 4 034354 
at 104401 00124S 
oiae a4 
A sr 
ie : He 
a | 398 TOs4Or 00124S 
sii Bre 118033 
Siug O34400 608963 
at a 03440e 05704 
fies BRR Rit 
ries ly desis 
flee Gtigt Meet one 
Hi pause 905710 001245 
fies BS Beeies 
rie fees fea 
a as plead 034464 
7171 4 
7172 O34466 104401 001245 
7173 Ze 000740 
$18 BR. HES neon 
5196 S408 e 010000 
7177 1 4354 
5158 Baas esate 000 
2180 O34See 104401 041121 
718s 034S26 O0S7 30 ooo04e 
7184 nl B1a7 ooo001 
7185 O34S42 012706 001100 
7186 O34S46 000137 023106 
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144430 
002314 


023134 


O2-DEC-77 10:43 PAGE 


TYPE ERROR ROUTINE 


10$: 


(RO)+,2S 
3$ 
, SCRLF 


0 
(PO)+,4S 
, SCRLF 


(Ro)+ Rl 
os ’ 


(RO)+,RO 

(RO)+)R2 
SCRLF 

tRO)+,R3 

(RO)+ 

R3 

14S 

RY 


12$ 
a(R1)+,-(SP) 


$s 
(RO)+, 18S 
10$ 


RY 
178 
, SPACE2 


hy) 
SCRLF 
los 
ERRCNT 
#SWi2, ISWR 
. ,ERRCNT 
,» ABORT 
42 


30S 
#1, SEOPCT 
astAck, SP 


133 
M POINT 
Sean Te THERE Isi"1 
LINE FEED 
Ss (EM) 
pas INTER S HERE 
. ey R 
: H IF THERE ISN’T ONE 
Ee Cee R 
: INTER Goes HERE 
:GET D INTER 
; H_ IF THERE ARE 
>RE INDE! 


;GET & TORE NUMBER OF DATA WORDS 
Paste ORMAT WORD 

RNY DATA FOR THIS HEADER 
A PRINT 

CK IF I 

PUT’ F Rst BATA WORD ON STACK 


mero 


it 
aif 


eck: ir NEXT eB OGr en Bvt. ISLE 


DO NO 
ate 
NOCBR H 


;GET NEXT DH POINTER 
;1F NO HEADER GET DATA 


ee 


oo 
aie GOES HERE 
5L 


; INCREMENT ERROR COUNT 
; CHECK IF ABORT AFTER 20 ERRORS 


RE 
Check TP EROR THRESHOLD EXCEEDED 


:NO, RETURN 
; TYPE opROGRAN AM HAS BEEN ABORTED BECAUSE 
ERROR THRESHOLD EXCEEDED” 

CHECK IF IN CHAIN MODE 


N 

iN. 0H ‘ END OF PASS COUNT TO ONE FOR ABORT 
; INITIALIZE STACK 

:BRING IN NEXT PROGRAM IN CHAIN 


SEQ 0133 


a 


CZR6EBO RK611 OSKLS CTRL PRIS 
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7187 O34SSe o00000 
7188 O34SS4 000207 
7189 

7190 

7191 

1m fess Here 
1S bees 

He fies bei 
is 1 

71 604 40 
7198 10 4 
7199 614 14 
feet REIS Bastar 
FES coean 

ree SEMEN 
7205 

7206 

7207 

7208 

7209 

7210 

7ell 

7ele 

7213 

7214 

7e1S 

7216 

7217 

7218 

7219 

7220 

7eel 

7555 636 105737 
7ee4 Os4e4s 100002 
7eeS Baleue 000000 
7226 646 9800430 
7ee7 Bale Bi go" 
Ze 17600 
7663 56 2737 
7 4 1011 
7231 132737 
72 O346 001405 
723 4 10037 
7e 737 
Ze 708 

7236 710 13273 
7237 716 001003 
7238 7 112046 
7239 7ee 001005 
7240 034724 005726 
7e41 034726 012600 
7e4e 034730 062716 


i 


g 8 
2 8 
2 & 


001157 


ooo00e 
000001 


000100 
034706 
033620 


000040 


oooode 
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023134 


001270 
001271 


001271 


11 


TYPE ERROR ROUTINE 


30$: HALT 
ess: RTS PC 


-SBTTL CONTROLLED PROGRAM HALT 


CTRHLT: MOV SBASE , R2 ;SET ’611 BASE 
MOV #CLR,RKCS2(R2) ;CLEAR SUBSYSTEM 
CLR SESCAPE :CLE SC 
CLRB SERFLG *CLEAR ERROR FLAG 
MOV aSTACK, SP ?CLEAR STACK 
TYPE OPROO? it T MESSAGE 
TST de TEST IF MONITOR PRESENT - 
BEQ S$ ?NO SKIP : 
MOV #1, SEOPCT *FORCE END OF PROGRAM 
IMP SEOP : JUMP TO END OF PASS 
Ss: HALT ;HALT PROGRAM 
IMP START1 :RESTART IF CONTINUE 


-SBTTL TYPE ROUTINE 
See eee eee eae ee eee aay TERTITATE IIH AO 


; BROUTINE TO TYPE ASCIZ MESSAGE . MESSAGE MUST TERMINATE WITH A O BYT 
j THE ROUTINE WILL INSERT A R OF NULL CHARACTERS AFTER A LINE FEED. 
:¥NOTEL: ara CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
: ¥NOTEe: S$FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
j #NOT E23: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 
; ¥CALL: 
:%#1) USING A TRAP INSTRUCTION 
iH TYPE , MESADR ;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
;% TYPE 
tx MESADR 
§ * 
$TYPE: TSTB STPFLG 3;1S THERE A TERMINAL? 
BPL ::BR IF YES 
HALT 25 j HALT HERE IF NO TERMINAL 
1$ MOV -(SP) :? SAVE 
MOV RO tsps RO ?:GET SS OF ASCIZ STRING 
CMPB aaPTENY. SENV T 


N AP 
FiNO.GO CHECK FOR APT CONSOLE 


BNE 
BITB #APTSPOOL,SENVM ;; NES 
BEQ 62S ;3;NO CHECK FOR CONSOLE 
MOV RO,61$ ;:SETUP MESSAGE RODRESS FOR APT 
ISR PC, SATY3 i; SPOOL MES TO APT 
61S: -WORD O tt OBT ss 
625: BITB #APTCSUP , SENVM CONSOL, SUPPRESSED 
BNE 60$ YES, SKIP TYPE OU 
2s: MOVB (80)+, -(SP) ese CHARACTER 10 BE TYPED | ONTO STACK 
BNE 43 *BR IF IT ISN’T THE TERMINAT 
TST (SP)+ :IF_ TERMINATOR POP IT OFF THE STACK 
60S: MOV Fe RO :RESTORE RO 
3$: ADD SP) :ADJUST RETURN PC 
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B 02-DEC-77 10:21 TYPE ROUTINE 
7243 034734 oo0002 RTI ; ; RETURN 
seus 034738 ef 000011 4$: cnre BHT, (SP) ::BRANCH IF <HT> 
7548 744 i908 000200 cneB BCRLF , (SP) ;;BRANCH IF NOT <CRLF> 
7 5e8 26 TS (SP)+ ;POP <CR><LF> EQUIV 
7550 TYPE. TYPE A CR AND LF 
reel 4 035114 cl SCHARCNT j CLEAR. AR CHARACTER COUNT 
7 7 035050 S$: ISR PC, STYPEC 3 Wee THY 15” CHARAC 
seed i 37 001156 65: CHES SFILLC, (SP + HH 5 iT T TIME R FILLER CHARS. ? 
z 013746 001154 MOV SNULL, -(SP) Get" #0 OF FILLER CHARS. NEEDED 
oseq 36010 doerro iogt Sgt whe See ee ED oe hall Oe OF STACK 
B3e01s 004737 o35050 JSR PC, STYPEC ::GO TYPE A 
7261 035016 105337 035114 DECB SCHARCNT +00 NOT COUNT AS A COUNT 
g 035022 000770 BR 7§ > :LOOP 
7eb4 ;HORIZONTAL TAB PROCESSOR 
7266 112716 oo00040 8S: MOVB : REPLACE TAB WITH SPACE 
7267 0235030 004737 035050 93: JSR Bo, $fsPEC >: TYPE A SPACE 
7268 035034 7 000007 035114 BITB aa SCHARCNT ::BRANCH IF NOT AT 
7269 2 001372 BNE 93" :;TAB STOP 
rer) Getic Sagres ie a LODr est ceed TER 
387 6 108777 144074 STYPEC: rsre 3 TPS . ::WAIT UNTIL PRINTER IS READY 
7274 1166 oo0002 144066 MOVB 2(SP). aSTPB ;;LOAD CHAR TO Be TYPED INTO pATA REG. 
7278 ose0re er 000015 odo0002 cHPS acr, etSP) ;;1S CHARACTER A CARRIAGE RETUR 
7e 30074 1 035114 cLRB SeuaRenT i =-CLEAR CHARACTER COUNT 
727 O381¢ 122786 000012 oooo02 1S: cHPS aL 6 (SP) HH iS CHARACTER A LINE FEED? 
550 Bett uted INCB (PC)+ BO ONT THE CHARACTER 
7282 035114 O00000 SCHARCNT:.WORD O :: CHARACTER COUNT STORAGE 
7283 035116 000207 STYPEX: RTS PC 
Zee .SBTTL BINARY TO OCTAL (ASCII) AND TYPE 
7287 : = REGGE ERGE GEER R RRR RRR ARERR ERR RRR ERRAR AERA RRRA AAR RARAHKARAEE 
7eee sATHIS R OUTINE IS Is SED TO CHANGE |& 16-BIT BINARY NUMBER TO A 6-DIGIT 
7230 {ESTYPOS-~-ENTER NHERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
7292 1% MOV NUM, - (SP) ;NUMBER TO BE TYPED 
7233 :% TYPOS ECALL FOR TYPEOUT 
1 i .BYTE N ::N=1 TO & FOR NUMBER OF DIGITS TO TYPE 
72396 1 a "BYTE MM :iM=1 OR 
;# YPE LEADING ZEROS 
7237 i# TE CUPPRESS LEADING ZEROS 
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6EB.P11 02-DEC-77 10:21 BINARY TO OCTAL (ASCII) AND TYPE 
7299 *#STYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
2300 i #$1YPOS OR $TYPOC 

= MOV NUM, -(SP) ;NUMBER TO BE TYPED 
7303 i TYPON tECALL FOR TYPEOUT 
70e | ESTYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
0 ; MOV NUM, - (SP) ;NUMBER TO BE TYPED 
7308 1a TYPOC PF CALL FOR TYPEOUT 

TYPOS: MOV (SP),-(SP) P 
oat0 Basie 017636 B8s007 oasaya © oS! Move 7(3P) | SOFT +O SRO ERO FILE SWITCH 
73l2 035132 112637 035345 MOVB (SP)+’ SOMODE+1 Hore: OF piciTs TO TYPE 
vals Galas epee OOM Sm RE eepdpnalegge 
7315 144 beta o00001 035343 STYPOC: nove #1,SOPTLL T HE ZERO PILL SWITCH 

ee - 
ee ec ee na MG Cn 
7318 166 610346 mov Ra, -(SP) SAVE 's 
7320 O3ei78 Bt ue MOV Re -{ 26} 1 aaVE RS \ 
73el 174 11 03534S nove SOMODE +1, RY +:GET THE NUMBER OF DIGITS TO TYPE 
I] ~8 8 

> 136502 RY T IT FOR MAX. ALLOWED 
ries Hees free am CC gr a 
5a5e p3esté btezoe paces MOV 12(5P);RS | Plo THE INPUT NUMBER 
7327 3 CLR R3 ich LEAR T TPUT_ WORD 
fies eee Be wo | uptecae we “© 
7330 035230 006105 2s: ROL as : FORM THIS DIGIT “ 
7h Heese Opel fe 
7339 DOE i 3S ROL RS’ 83 ;:GET LSB OF THIS DIGIT 
7335 108337 035344 . DECE SOMODE ii Fvre Fas plait? 
7337 035250 baooo3 177770 BIC #177770,R3 ::GET RID OF JUNK 
7338 035254 1002 BNE 4g :: TEST F 
7 ? TST RY He ° HIS 0? 
? a0 B325PR T4B3 BEG S$ ti BRP TRE? S 
7341 G35¢be 005204 4S: INC RY - HiReRE "rate Bfste peer 0*s 
5345 Baessq eteteet Ta S$: gfe 8’ 'R +t Mak eae Ode Nf ac READY 
7344 035274 110337 035340 MOVB R3, 6S ::SAVE FOR TYPING 
7a 10) Baesi2 rs: gC aS Buty by ets otarr 
i ig 3 rd : BGT es :3BR IF MORE TO DO 
5348 932316 Nic Re +t PR cURE LAST DIGIT ISN’T A BLANK 
7350 035316 000744 ai BR oe at ::G0 DO THE LAST DIGIT 
73k Gaetee O1seot (RY EIEES—LRESTORE fa 
7354 035326 O16666 oo00002 oD0004 MOV 2(SP);4(SP) ::SET THE STACK FOR RETURNING 
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B3esae 


1 
Bais 
03534 
035344 


BABBAE 


BR 


020200 
000020 
ooooss 


035562 
000040 


o35SS2 


900060 


000040 


000010 


MACY11 30(1046) 


Rey 
8S: » 
SOCNT: “BYTE 
SOF ILL: . BYTE 


SOMO 


* WORD 
.SBTTL CONVERT be. To pecrmat.’ i ee 
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(SP)+, (SP) 


8 


8 


10:43 PAGE 137 
BINARY TO OCTAL (ASCII) AND TYPE 


RE a FOR Heb ROUTINE 


DIGIT 


44 PERO FLL SWITCH 


OF DIGITS TO TYPE 
ROUTINE 


eee ee ee rere tS cnaNGe A leeBIT BINARY NUMBER TO A S-DI 


eae es 
: MOV 
;* TYPDS 
STYPDS: 


000001 


S$: ASCE 
177777 


6$: BIS 
7$: BIS 


: SREPLACED WITH Spaces. 
;*CALL: 


NUM, -(SP) 
RO, -( SP) 
R1,-(SP) 
Re, -(5P) 
Ra, -(5P) 

RS: -(SP) 
#20200, -(SP) 
20(SP)'RS 
1$ 

RS 
#’-,1(SP) 
RO 
#$DBLK,R3 

#’ ,(R3)+ 


SOTBL(RO),RI1 
R1,RS 


R 
Ri, RS 
RS" 
S$ 
(oP) 
(3p) 


6$ 
1(SP),.-1(R3) 
#’°0,Re 


we Tnen ti 


ano Tyee F< COEPENDING NON se WILL "Be T¥BED 


He NUMBER. LEADING ZEROS WILL ALWAYS B 


7 sPUT OSE RORY MUnser ON THE STACK 
,* 


on ste 
TACK 


2 
$3 


wr PUT 
T CHARACTER TO A BLANK 
aco R 


SRR E BS ETE 


UB "BOING {NG LEADING 0’S? 


a9 Fe BCD BieiT ASC! 


oat THIS fetcaetierdh IN THE 
T INCREMENTI 


F NOT ALREAOY 8 DIGIT 
PUT BUFFER 


SEQ 0137 


CZR6EB 
C2 
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035652 
035656 
035662 
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037 


BeSeon 
— pe ae 
Shee dah th pe het 
iG) 
N 


oo 
or 


021627 


177777 


035562 
o0000e 


0358572 


143304 
000100 


143270 
177600 
000003 


Til 
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177776 


oooco4 


000062 
143274 


CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


8$: TSTB (SP )+ ;;WAS_ THE LSD THE FIRST NON-ZERO? 


BPL 93 ::BR I 

MOVB =1(SP),-2(R3) i; YES-=SET THE SIGN FOR TYPING 
Qs: CLRB (R3) ::SET THE TERMINATOR 

MOV (SP)+,RS ::POP STACK INTO RS 

MOV (SP)+'R3 :;POP STACK INTO R3 

MOV (SP3+/Re ::POP STACK INTO Re 

MOV (SP)+/R1 ::POP STACK INTO R1 

MOV (5P)+'RO ::POP STACK_INTO RO 

TYPE SDBLK © : NOW T THE 

MOV 2(SP),4(SP) ::ADJUST THE STACK 

MOV (SP)+, (SP) 

RTI ;;RETURN TO USER 
$OTBL: 10000. 

1000. 

100. 

0 


10. 
SOBLK: .BLKW 4Y 
-SBTTL TTY INPUT ROUTINE 


5 fj RRR AERA EEE ERE EERE RE EERE RE RE RRL E REE RE LE REE 


2 NABL LSB 
TKCNT: .WORD O ;;NUMBER_OF ITEMS IN QUEUE 
TKQIN: .WORD 0 :: INPUT POINTER 

S$TKQOUT: .WORD O ::QUTPUT POINTER 

STKQSRT: .BLKB 1 ::TTY KEYBOARD QUEUE 

STKQEND= 
EVEN 

;*#TK INITIALIZE ROUTINE 

!*¥THIS ROUTINE WILL INITIALIZE THE TTY KEYBOARD INPUT QUEUE 

:#SETUP THE INTERRUPT VECTOR AND TURN ON THE KEYBOARD INTERRUPT 

+ #CALL: 

: ISR PC, STKINT 

: RETURN 

$TKINT: CLR ;;CLEAR_COUNT ITEMS IN QUEUE 


STKCNT OF 
MOV #STKQSRT,STKQIN ::MOVE THE STARTING ADDRESS OF THE 
MOV STKQIN,STKQOUT ;;QUEUE INTO THE INPUT & OUTPUT POINTERS. 
MOV #STKSRY a¥TKVEC :; INITIALIZE THE KEYBOARD VECTOR 
MOV #200, a8tKVEC+2 ;;"BR” LE 4 


TST astK >;CLEAR DONE FLAG 
MOV #100, STKS ? ENABLE TTY KEYBOARD INTERRUPT 
RTS PC ?:RETURN TO CALLER 
;*TK SERVICE ROUTI 
:*THIS ROUTINE WILL SERVICE THE TTY KEYBOARD INTERRUPT 
: “BY READING THE CHARACTER FROM THE INPUT BUFFER AND PUTTING 
:*#IT IN THE QUEUE. 
:#IF THE CHARACTER IS A “CONTROL-C™ (tC) STKINT IS CALLED AND 
!%UPON RETURN EXIT IS MADE TO THE “CONTROL-C“ RESTART ADDRESS (CTRHLT) 
$TKSRV: MOVB aSTKB, -(SP) ;;PICKUP_THE CHARACTER 
BIC #0177, (SP) :;STRIP THE JUNK 
CMP (SP), #3 ::IS IT A CONTROL C? 
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7467 001007 BNE 1S ;;BRANCH IF NO 
cube 0356 LoWag 036766 TYPE SCNTLC :: TYPE A CONTROL-C (tC) 
a 1 rap SesT ite Stace 
747 38702 (39 34556 IMP FRacT ::CONTROL C RESTART 
raze 706 1627 raialita 1$: cH (SP), #7 He Is abe uh CONTROL G? 
7474 032316 93993 000176 001140 CMP #SWREG, SWR ::I1S SOFT-SWR SELECTED? 
ozs 035722 O01 BEQ 65 ::G0 TO SWR CHANGE 
74 7. es: > 
raze e De 27 000001 035572 CNP a , STKCNT :;1S THE QUELE FULL? 
ae +3 ANC 

74 0357 O4401 opi24o TYPE $BELL ::RING THE TTY BELL 
e181 038749 veo rst (opi+ ;:CLEAN CHARACTER OFF OF STACK 
oes g35744 021627 000023 3S: CNP (Sp), #23 7315 IT A CONTROL-S? 
rise Geeres Beevee ststce is Reerean gree orem 
rie? Gaereo 108/77 1wa160 ais: Tere ey HMBET COR A HOR 
aus 035766 Ose 143154 MOVB a$TKB,-(SP) 5 3GET THE ¢ ACTER 
7490 77 e716 177600 BIC #tC17?, (SP) ::MAKE IT 7-BIT ASCII 
rat Beas Bersee Comte! ce Sapte atau Pongo 
oi33 4 127 000100 143132 nov #100, 3$TKS { REENRBLE TTY KEYBOARD INTERRUPTS 
7495 p3eotg 035572 32S: INC STKCNT !ICOUNT THIS CHARACTER 
pag? Gaece4 oGeues COOLNO 5 SOA tegen tiBRONCH IF YES 
pugs | Oaese 53002 re Oe ta castes AS ALA praca CHAR? 
7500 34 e716 000040 BIC #40, (SP) >:MAKE IT UPPER CASE 

1 112677 177530 4S: MOVB (SP§+, aSTKQIN ;:AND PUT IT IN QUEUE 
750¢ 37 035574 INC sTkat ; {UPDATE THE POINTE 
7503 O36 SO Ges 27 035574 035601 CMP TKQIN, #STKQEND 5 1G 4 TH ng? 
75 si 0 993 035600 74 fi , #STKQSRT,STKQIN ;; ot ¢ THE POINTER 
750B B3ecee panoRe so. Rey é' tt RETORN : 
zane 5 aera ee esiTeH REGISTER CHANGE ROUTI, 
7510 :*#ROUTINE IS ENTERED FROM THE T HANDLER, AND WILL 
raid TERE Ghent GpERBT Ine" 16 EN AT ERRUET BoE cr NECISTER TARP 
7513 036070 022737 000176 001140 $CKSWR: cH #SHIREG, SHR 33 S THE SOF T-SWR SELECTED 
sie GEIR acer tom a LE Ro eaan™ 
7517 036106 117746 143034 MOVB aSTKB,-(SP) ::YES ’ 
7518 O36lle 042716 177600 BIC #tC177, (SP) :!MAKE IT 7-BIT ASCII 
7519 036116 021627 000007 CMP (SP), #? ::1S IT A CONTROL-G? 
7520 036122 061300 BNE 2s :iIF NOT, PUT IT IN THE TTY QUEUE 
spel ::AND EXIT 
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7Se3 g% REKSKARAKRRARRERELEAALKARAAAAAARAARAAAALKKERARRARERRRRRKRRRRRREREKE 
7524 :&CONTROL IS PASSED TO THIS POINT FROM EITHER THE TTY INTERRUPT SERVICE 
oe RS TEOE CBE The TOBEDS ANG THE SOFTWARE SWITCH REGISTER BEING SELECTED 
752 ae 423727 001134 ooo001 6S: cNre SQUTOB, bi 3 ;ARE WE RUNNING IN AUTO-MODE? y 
5258 1 7 TST (SP i+ 3 BRAK ONTROL - F STACK 
st Gis Bice see dy Geyer Pee tale tetas 
oe B3eiue 112737 000001 001135 MOVB #1, SINTAG :iQt NF ERRUPT INDICATOR 
7534 036154 104401 037000 TYPE SCNTLG ::ECHO THE CONTROL-G (1G) 
75 160 1o4404 037005 S$GTSWR: TYPE * SMSWR 5 Oe CURRENT CONTENTS 
523 179 — MOPoc ~~ 1 oO VE SURE TA ASCIT TALL DIGITS) 
7538 036172 04401 037016 TYPE , SMNEW ;;PROMPT FOR NEW SWR 
7539 0361 00s: 19S: CLR ~(SP) ; }CLEAR COUNTER 
out Opeo75 142736 75 oe, oasTKS FE MERE? 
oo4 036206 100375 ' BPL 7§ ::IF NOT TRY AGAIN 
7544 10 117746 142732 MOVB aSTKB,-(SP) ::PICK UP CHAR 
rou psesi9 042716 177600 BIC #tC177, (SP) ::MAKE IT 7-BIT ASCII 
yeug S280 IBZ com009 RE SHUR AAEA A BONERONC” 
fess Geese Gezren Sa6ote Ss Sa 2 
gee 36 061963 001135 oo00001 cNPS SIATAG, #1 j ;REENABLE TY KEYBOARD INTERRUPTS? 
75 0127 000100 142670 MOV #100, 3STKS ::ALLOW TTY KEYBOARD INTERRUPTS 
geod 036254 000137 034556 8s: IMP CTRHLT +: CONTROL-C RESTART 
75 
Fees GSE paingz sommes an: a a 
yee Geeeve (US BERGE cos. aor ECSY TER PREPS EY 
756 036276 000737 ; BR 19$ ::LET’S TRY IT AGAIN 
7563 
7564 O _ 
yest GRU Opies? coos a: ae an oY 
res Gas BBicgs 0000 a Le LBnahchS Tyee FIRST ome 
7568 036314 016677 oOO00002 142616 MOV 2(SP),aSWR >:SAVE NEW S' 
7569 706 900906 11S: ADD ig SP ::CLEAR UP STACK 
7570 1 401 1245 145: TYPE CRLF *:ECHO <CR> AND <LF> 
7878 3767 1135 000001 cHPS SINTAG, #1 j RE-ENABLE wry KBD INTERRUPTS? 
7e73 o3e305 012777 oO00100 142574 a nov #100, aSTKS j ;RE-ENABLE TTY KBD INTERRUPTS 
7575 0363 nights 035050 168: JSR PC, STYPEC ?:ECHO CHAR 
vere Baeses Bouten on0oeo gy fae Fetes OF ves 
7578 036364 021627 000067 CMP (SP), #67 ::CHAR > 7? 
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036550 
0365S2 


O4e7e6 000060 
00$766 000002 


1 

316 

316 
005266 000002 
056616 177776 
D006 
104401 001244 
000720 


011646 
016666 OO00004 
008066 000004 
OOSO46 


piers 036456 
00$737 035572 
17768 agate 
Se37 035576 
37e7 035576 


00100 
te 7 035600 


46 
03 
03 036756 
03 036766 


000177 
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ooo0de 


oooo04 
035601 
035576 





Y INPUT ROUTINE 

BGT 18$ ;;BRANCH IF YES 
BIC 4e0 (SP)+ ::STRIP-OFF ASCII 
rot ecSP) iTS THIS THE FIRST CHAR 
ASL (SP) aaah SRESENT 
ASL (SP) +: "CHAR OVER TO MAKE 
ASL (SP 5 :: ROOM FOR NEW ONE 

17S: INC 2(SP) :iKEEP COUNT OF C 
Bee gr(SP 1 aet He ea" 

18$: TYPE SQUES :: TYPE ?<CR><LF> 

any BR 20s :iSIMULATE CONTROL-U 


5 SE Se SE SE AE 0 HE SE SE HE 0 SE a J 9 A a HH HE HH 
i ATHIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 


;*CALL: 

Ht RDCHR 33GE ae BaRec TER FROM 3 QUEUE 
;* RETURN HERE ; ; CHARAC S_ON THE STACK 

;; WITH BARITY “eit STRIPPED OFF 


SRDCHR: MOV (SP) ,-(SP) PUSH DOWN THE PC AND 
MOV 4(SP},2(SP) +3 ime Pe apy 
CLR 4(5P) ape: ADY FOR A CHARACTER 
CLR -(5P) ::PUT NEW PS ON STA 
MOV #64, -(SP) ::PUT NEW PC ON STACK 

cal RTI ::POP NEW PC AND PS 

1S: TST 7 ;;WAIT ON A CHARACTER 
DEC $TKCNT ‘1 DEGPONEN THE COUNT ER 
MOVB g$TKGOUT, 4(SP) TONE CHARACTER 
INC $TK@ ATE THE POINTER 
cne TROUT, WSTKQEND’ ! gDID ir G6 GO OFF OF THE END? 
mov #STKQSRT, $TKQOUT’ : iF T H tee POINTER 


es: RTI 
 ieaxevatnenenevexerasseeensesdbonetotengeneaenenenecenenececes 
jATHIS: ROUTINE WILL INPUT A STRING FROM THE T 


i: 
i ROE RN HERE i IMPRESS BE ee CHARGETER WILL BE ON THE STACK 
2 a dooms, b WILL BE A BYTE OF ALL O’S 
SRDLIN: MOV R3 5{SP) ; SAVE E Ra 
CLR (SP) 3 EAR RHEE RUBOUT KEY 
1S: MOV #STTYIN, R3 
2s: CH BSTTYINGS. , R3 i }BUFFER, FUcL? 
ROCHR +86 0 READ ONE c CHARACTER FROM THE TTY 
MOVB (SP)+, (R3) siGT 
10S: CMPB #177, (R3) ‘IS ITA A RUBDUT 
BNE S$ :BR IF NO 
TST (SP) A THIS THE FIRST RUBOUT? 


co 
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ress Bese 901997 ave i edt a 
000134 036754 MOVB #’\,9S +; TYPE A BACK SLASH 
opae paper ea 036539 nove 3$ (SP) THE _RUBOUT KEY 
248 6$: Bex A; . i BRL TBE Ae BRE 

7640 036576 gee” 036756 CMP R3, #STTYIN ::STACK EMPTY? — 
soul 03660¢ 1 434 BLO 4§ ::BR IF YES 
76 lll 036754 MOVB (R3), 9S ::SETUP TO TYPEOUT THE DELETED CHAR. 
so43 036619 401 036754 TYPE 9g ::G0 T 

44 14 a4e BR 2 ::GO READ ANOTHER CHAR. 
764S 716 S$: TST (SP) ;:RUBOUT KEY SET? 
seus OL 308 BEQ 7 33 

4 1127. 000134 036754 MOVB #’\, 9S :: TYPE A K SLASH 
7e4e 04401 036754 TYPE 9 
76 18 CLR tSP) ;;CLEAR THE RUBOUT KEY 
7650 122713 000025 7$: CMPB #25, (RB) *:IS CHARACTER A CTRL U? 
76 42 901903 BNE BS $3 F NO 
76) 44 401 036773 TYPE SCNTLU ::TYPE_A CONTROL “U” 
76 2g 726 BR is ?:GO START OVER 
7654 2713 oo00022 8S: CMPB #22, (R3) ?:I1S CHARACTER A “tR™? 
7655 036656 1011 NE 3$ ::BRANCH IF NO 
76 105013 CLR (R3) >; CLEAR THE CHARACTER 
76 104401 001245 TYP , SCRLF ::TYPE A “CR” & “LE 
76 104401 036756 TYPE STTYIN ::T THE INPUT STRING 
7659 72 0007 17 BR 2s +?GO PICKUP ANOTHER CHACTER 
7660 74 1044 1 oo1244 4S: TYPE SQUES :: TYPE A’? 
robe O36 re ozs 936754 35 cov is 1,95 1 CLEAR ee BURASTER OOP 
oeeN at ides : 638784 CMPB (3 mae xen K FOR RET 
sb68 O3er16 BNE 3g ’ >:LOOP IF NOT aes 
76 7 1 177777 CLRB -1(R3) >:CLEAR RETURN (THE 15) 
7667 401 O0124%6 TYPE sur ii TYPE A LINE FEED 
7 7 Zee TST tSP)+ 33CL T KEY FROM THE STACK 
766 7 i MOV (SP)+,R3 > ;RESTOR 
7670 734 O11646 MOV (SP), -(SP) ::ADJUST THE STACK AND PUT ADDRESS OF THE 
7671 736 016666 000004 ocooo0e MOV 4(SP5,2°SP) 33 FIRST ASCII CHARACTER ON IT 
767¢ 3ern4 27 66 036756 Oo00004 nov aSTTYIN, 4<SP) ger 
7674 O36 ] 00 9S: .BYT 0 +: STOR FOR ASCII CHAR. TO TYPE 
7675 bed S60 BYTE 0 bifl PATOR 
2676 036756 990019 STTYIN: -BLKB _ Rate at ed j ;RESERVE 8 BYTES FOR TTY INPUT 
7678 36773 Tae goods SENTLU: “Bast AAsiatees  EONTR “a 
7679 037 043536 o0Ss0i5 006 SCNTLG: -ASCIZ /7*#G6/<15><1le> ::CONTROL “G” 
7680 037008 O15 Osi4i2 051127 SMSWR: .ASCIZ <15><12>/SWR = 7 
7oee 037016 26040 pao te 020127 SMNEW: .ASCIZ / NEW = / 
7684 037030. . EVEN 
7o88 “SBTTL READ AN OCTAL NUMBER FROM THE TTY 
7687 5 5 HERE EAE AE HE HE HE HE HE A He HE HE HE HH HE HE A A EE EERE 
7688 !&THIS ROUTINE WILL READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND 
7689 ?*#CHANGE IT TO BINAR 


Y. 
7690 ;*THE INPUT CHARACTERS WILL BE CHECKED TO INSURED THEY ARE LEGAL 


Es 


Nll 
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CZR6EB.P11 02-DEC-77 10:21 READ AN OCTAL NUMBER FROM THE TTY . 
7691 ; ¥OCTAL DIGITS. IF AN ILLEGAL CHARACTER IS READ A"? WILL BE TYPED 
7692 ?*#FOLLOWED BY A CARRIAGE RETURN-LINE FEED HE COMPLETE NUMBER MUST 
7633 j ATHEN BE RETYPED. THE INPUT IS TERMINATED By TYPING A CARRIAGE RETURN. 
7695 $i * RDOCT ; ;READ AN OCT AL NY MBER 
7696 + RETURN HEPE she ORDER BITS ORE ON TOP OF THE STACK 
3697 $% HIGH ORDER BITS ARE IN SHIOCT 
7699 037030 011646 SRDOCT: MOV (SP), -(SP) ; PROVIDE SPACE FOR THE 
7700 037032 016666 o00004 ocD0002 MOV 4(SP}_2(SP) : INPUT NUMBER 
raat 037040 010046 MOV RO, -(SP) i }PUSH RO ON STACK 
77 s04e 010146 MOV R1i,-(SP) *PUSH R1 ON STACK 
7703 037044 010246 MOV Re, -(SP) PUSH Re ON STACK 
7704 O370% 104411 1$: ROLIN >:READ AN ASCIZ LINE 
7705 037050 012600 MOV (SP)+,RO 33GET ESS OF 1ST CHARACTER 
77 37052 010037 037156 MOV RO,SS$ :AND SAVE IT 
aa 7056 S001 cLR Ri CLEAR DATA WORD 
2703 70be 112046 2s: nove {R0)+,-(SP) 5 ;PICKUP THIS CHARACTER 
si Earp deszg coos a Sa oa ei 
7713 7074 7 7 M #’7, (SP) 
7714 §359 b55q38 _— gre — 
7715 0371 006301 ASL RI 33 #2 
7716 O371 0061 ROL Re 
7717 0371 006301 ASL RI 557 *4 
7718 7110 OO061 ROL Re 
7719 O37it 906301 ASL Ri 538 
7780 7114 102 ROL Re 
7721 037116 042716 177770 BIC #tC7, (SP) ; STRIP THE ASCII JUNK 
7722 037122 O6e601 ADD top) )4,R1 ;3ADD_IN THIS DIGIT 
7723 037124 000756 BR 2g >LOOP 
7724 037166 005726 3S: TST (SP)+ tt CLEAN TERMINATOR FROM STACK 
7725 0371 010166 oo001e2 MOV R1,12(SP) ::SAVE THE RESUL 
77 037134 019237 037166 MOV Re; $HIOCT 
772 7140 O1 MOV (SP)+, Re ;;POP STACK INTO Re 
7728 037142 012601 MOV (SP)+/R1 :;POP STACK INTO RI 
7788 o37i44 o12600 nov (SP)+;RO ; POP STACK INTO RO 
7731 037150 paeoge 4S: TST (SP)+ tier EAN PARTIAL FROM STACK 
7732 037152 105010 CLRB (RO) ::SET A TERMINA 
3733 037154 1Owso1 * TYPE " >: TYPE UP THRU THE BAD CHAR. 
7735 037160 104401 001244 : TYPE $QUES 33"2" “CR” & “LF” 
7736 037164 000730 BR i$ 33 TRY AGAIN 
7737 037166 000000 SHIOCT: .WORD O *HIGH ORDER BITS GO HERE 
2738 "GBTTL. SAVE AND RESTORE RO-RS ROUTINES 
re Lit Oe perc napenenengiagepemaentaniemtemmeamte ince eranns 2 Rie 
oes ; one: REG 
inp : SUPON RETURN FROM SSAVREG THE STACK WILL LOOK LIKE: 


: 
7746  *TOP---(+16) 


CZR6EBO RK611 
C2ZR6EB.P11 


OSKLS CTRL PRTS 
Oe-DEC-77 10:21 


SEER IOS 


O0O00000000 


Ratatatatatat 


: 


atti 


o 
mB 


ruruforarunynynatany 
i=) 
~ 


gBoccoecoose® 


stg 
Re 


017737 141650 
012737 OQ373le 
012737 000340 
000000 
00077 

74 
01e737 000144 
005237 0374 
001375 
005337 037410 


MACY11 30( 106) 
SA 


VE AND RESTORE RO-R 
3% 42---(418) 


3% +4---RS 
3% +6---RY 
;# +8---R3 
; #+10---Re 
3&¢+1e---8) 
3 #4+14---RO 


SSAVREG: 


;*RESTORE RO-RS 
* CAL . 
RESREG 


s 
-# 
$RESREG: 


Ble 


02-DEC-77 10:33 PAGE 


ROUTINES 


RO, -(SP) 
R1,-(SP) 

Re, -(5P) 
R3,-(5P) 
R4’-(SP) 

RS, -(SP) 
22tsP),-(SP) 
22(5P);-(SP) 
22(5P),-(5P) 
22(5P))-(SP) 
(SP)+,22(SP) 
(5P)+; 22(SP) 
(SP)+) 22(5P) 
(SP)+,6e(SP) 
(SP)+)R 
(SP)+>R4 
(SP)+,R3 
(5P)+;Re 
(SP)+)R1 
(SP)+;RO 


144 

;;PUSH RO ON STACK 

; ; PUSH RE ON STACK 
;;PUSH Re ON STACK 
;;PUSH R3 ON STACK 
;;PUSH RY ON STACK 
;;PUSH RS ON STACK 
;;SAVE PS OF MAIN FLOW 
;;SAVE PC OF MAIN FL 
;;SAVE PS OF CALL 
;;SAVE PC OF CALL 
;;RESTORE PC OF CALL 
;;RESTORE PS OF CALL 
;;RESTORE PC OF MAIN FLOW 
ssReaT PS OF MAIN FLOW 
;;POP ST INTO RS 
;;POP ST NTO RY 
;;POP ath INTO R3 
;;POP STACK INTO Re 
;;POP ST INTO R 
;;POP STACK INTO RO 


-SBTTL POWER DOWN AND UP ROUTINE 
5 5 26 SEE EAE AE E90 A a A a a HH 


;POWER DOWN ROUTINE 


;SAVE SWITCH REGISTER 


;SET UP VECTOR 


5g MERE MEME AE AE EE HEH HE HE HE HE HE AE AE HE EERE E AREA E REE R ERE EERE 


0 
002256 $PWRDON: MOV aSWR, SAVSWR 
000024 MOV #SPWRUP , PWRVEC 
000026 MOV #PR7, PHRVEC+2 
HALT 
--2 ;HANG UP 
-POWER UP ROUTINE 
$PWRUP: CLR 
037410 MOV #100. , SPWRCT+2 
1S: INC SPWRCT 
BNE 1$ 
DEC SPWRCT+2 


;LOAD WAIT COUNT 
;WAIT FOR TELETYPE 


SEQ 0144 


CZR6EBO RK611 OSKLS CTRL PRTS 
CZR6EB.P11 O02-DEC-77 10:21 


7803 037336 001372 
7804 037340 Ole737 037264 


as 


360 104401 03741 


Bee Blarce frase 


037402 000177 141500 


037406 Oo00000 000000 
037412 O47S2e0 O425e7 


ee ee 


—-OWONT UI SUN OC. 


7820 


SSNS SINN 
BHOHH awa 


1004 
37ee ibe00 ooo0de 


037434 016000 0374S4 
037440 


7 7442 811686 
7 7444 016666 000004 
3 000062 


7850 O374e4 o3e160 
oBal 037466 035346 
7853 037470 036160 


78ssS fae 036070 


7888 037500 037030 


Cle 


MACY11 30(1046) O2-DEC-77 10:43 PAGE 14S 
POWER DOWN AND UP Routine wee Gots 
1S 
ogage4 Mov #SPURON, PURVEC ;SET UP FOR POWER DOWN VECTOR 
_— V asTatk, SP sFORCE peek 
TYPE SPOWE on naa 
141542 mee PE EARCHK UAHA ecls sfER — 
MOV SBASE , Re 1 BASE 
IMP SSLPHOR’ ; ;GO BACK’ 5 INST Ades 


SPWRCT: .WORD ; TELETYPE TIME OUT 
000122 $POWER: .ASCIZ OPOWER/ 


.EVEN 
. SBTTL TRAP DECODER 


33 THIS ROUTINE MILL PICKUP THE COMER BYTE OF THE “TRAE” ING TRUCTION 
LL L 
Tol Tnbex THROUGH THe TRAP TABLE FOR THE STARTING ADDRESS 
xo THE. DESIRED ROUTINE. THEN "USING THE AAODRESS OBTAINED IT WILL 
4 TO THAT ROUTINE. 


STRAP: MOV RO,-(SP) ;;SAVE_RO 
MOV 2(5P),RO 3 3GET TRAP ADDRESS 
ove (ROD RO + BOCK GHT BYT TRAP 
ASL Ro” get Matte By TnBexiNe 
MOV $TRPAD(RO),RO ;;INDEX TO TABL 
RTS RO ::GO0 TO ROUTINE 


;;THIS IS USE TO HANDLE THE “GETPRI” MACRO 
STRAP2: MOV (SP),-(SP) 3M THE PC D 
oo0002 HOV 4(SP5, ~SeSP) 4 HOVE THE BS yy BOHN 
RTI >:RESTORE THE PSW 
.SBTTL TRAP TABLE 


;*THIS TAB ONT STARTING ADDRESSES OF THE ROUTINES CALLED 
Ey Fue et Rab™ INSTRUCTION. 
; ROUT INE 
$TRPAD: .W STRAP2 
$TYP ; ;CALL=TYPE TRAP+1(104401) TTY TYPEOUT ROUTINE 
STYPOC ;;CALL=TYPOC TRAP+2( 104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
STYPOS ALL=TYPOS TRAP+3(104403) TYPE OCTAL NUMBER (NO LEADING ZERO 
TYPON ::CALL=TYPON TRAP+4 ( 104404) TYPE ocTaL NUMBER (AS PER LAST CALL) 
TYPDS ::CALL=TYPDS TRAP+S(10440S) TY’ CIMAL NUMBER (WITH SIGN) 


SGTSWR ;;CALL=GTSWR TRAP+6( 104406) GET SOFT-SWR SETTING 
SCKSWR ;;CALL=CKSWR TRAP+7( 104407) TEST_FOR CHANGE IN SOFT-SWR 
SROCHR ;;CALL=RDCHR TRAP+10( 104410) TTY TYPEIN CHARACTER ROUTINE 


SROLIN ;;CALL=RDLIN TRAP+11(i04411) TTY TYPEIN STRING ROUTINE 
$RDOCT ;;CALL=RDOCT TRAP+12( 104412) READ AN OCTAL NUMBER FROM TTY 


CZR6EBO RK611 OSKLS CTRL PRTS 
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sea 837605 Osreee 


7861 037506 033566 


MACY11 30(1046) O2-DEC-77 10:43 PAGE 146 
TRAP TABLE 


SSAVREG ;;CALL=SAVREG TRAP+13 
»  $RESREG ;;CALL=RESREG TRAP+14 
* SCOPIS ;;CALL=SCOP1 TRAP+1S 


rare 


zmD 


VE RO-RS ROUTINE 


SEG 0146 


STORE RO-RS ROUTINE 
TERNAL LOOP ON ERROR 





E12 
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CZR6EB.P11 O2-DEC-77 10:21 DATA TABLE FOR PRINT OUT 
7 -SBTTL DATA TABLE FOR PRINT OUT 
gt! pro: ri STESIN’ TRAPPC 
1116 O02220 ODTOOO4: .WOR TESTN, SERRPC,E.CS1,7.CS1,7T.CS2,T.ER,T.DS 
002170 002174 
001116 002244 OTOOOS: .WORD STESTN,SERRPC,E.MR1,T.MR1 
001116 002246 OTOO0&: .WORD STESTN,SERRPC,E.MR2,T.MRe 
001116 002250 OTOO07: .WORD STESTN,SERRPC,E.MR3,T.MR3 
O04418 002244 ~OTOO10: .WORD S$TESTN,SERRPC,E.MR1,1T.MR1,PR.BIT,M1.BIT,BITCNT 
002 002322 
001116 goeces DTOO11: .WORD S$TESTN,SERRPC,E.CS1,7.CS1,PR.BIT,M1.BIT, BITCNT,T.CS2,T.ER,T.OS 
170 002174 
BOLL LE atts OTO014: .WORD STESTN,SERRPC,E.DCYL,T.OCYL,E.DA,T.DA 
416 pO esac DT00i7: .WORD STESTN,SERRPC,E.MR1,7.MR1,P1.B1T,PR.B7T,M1.BIT,M2.BIT,BITCNT 
alt 002326 
BOLL Le 002254 OTO021: .WORD STESTN,SERRPC,E.ECPT,T.ECPT,BITCNT 
Ooi 74 Oasi72 DTO026: .WORD STESTN,SERRPC,T.CS1,T.CS2,T.ER,1T.0S,T.WC,T.DCYL,T.DA 
1 
DOieS4Y 001116 DTO037: .WORD STESTN, SERRPC 
001162 001164 001166 OTOO4O: ‘WORD S$REGO, $REG1, SREG2 
eae BOL LAS O002eeS4 O41: :WORD STESTN,SERRPC,E.ECPT,T.ECPT,E.ECPS,T.ECPS,BITCNT 
14 00ee12 
Ooizst BOLL Le 002252 ODTOO43: .WORD STESTN,SERRPC,E.ECPS,T.ECPS,BITCNT 
o1s84 001116 002234 DTOO4S: .WORD STESTN,SERRPC,E.ER,T.ER 
Ooie54 001116 OO02224 DTOO4: .WORD STESTN,SERRPC,E.BA,T.BA 
Ooie54 001116 002222 DTO0b2: .WORD STESTN,SERRPC,E.WC,T.WC 
001254 001116 001162 ODTOO63: .WORD STESTN,SERRPC, SREGO, SREG3, SREG1, SREGY, SREG2 
Bat ice 001164 001172 








cenegeO ee OSKLS Com. PRTS 


CZR6EB .P 


7907 
7908 


PERRERERRRRE 
Mei atetatntetat tet 


ge 


ag 


Ba 


ooo 
eee 


etIS SITET 


SHINS TOS ROE ESSROSRVVIR TE SRED 


SESSSSOOSES 





Oe-DEC-77 10:21 
ooo001 
00e 000 
ooo 
000 
906 ooo 
000 ooo 
gs 000 
3 000 
oooo0s 
000 000 
0 ooo 
002 000 
041314 
000 ooo 
041351 
002 000 
ooo00s 
000 000 
041232 
000 000 
041250 
002 ooo 
041314 
000 000 
041367 
000 
cooke, 
041 3 — 
530 000 
041250 
000 
041314 
00! 000 
041405 
002 000 
ooo00s 
000 000 
O41e32 
00 ooo 
041250 
0 000 
04151 
00: 000 
041563 
00 000 


MACY11 30(1046) 


DFOOO: .WORD 
DFOOO4: .WORD 


02-DEC-77 
DATA FORMAT FOR PRINT OUT 


-SBTTL DATA FORMAT FOR PRINT OUT 


HO10A 


10: i PAGE 148 


SEG 0148 
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CZR6EB.P11 02-DEC-77 10:21 DATA FORMAT FOR PRINT OUT 
7963 DFOO11: .WORD 6 
7964 000 “BYTE 0,0 
796 ; DHOO0A 
? 000 “BYT 5.9 
796 WO} 008 
000 ‘BYTE 2,0 
? : DHOi0 
793 000 “BYTE 0,0 
797 i DHO108 
7 000 ‘BYT 5,0 
797 - WO DHOOYE 
7974 000 "BYT 3,0 
73 DFOO14: :WORD 5 
793 000 "BYT 0,0 
79 - DxHOo0A 
73 000 ‘BYTE 0,0 
797 : DXkO008 
? 000 ‘BYTE 2,0 
7981 ‘ DHO14 
; 000 ‘BYTE 0,0 
7 wh DHO14A 
000 ‘BYTE 4,0 
7985 DFO017: :WORD 5S 
7986 000 “BYTE 0,0 
cae tA 000 BYT’ bAgooA 
oae0 000 : yore p00 
7991 ane - WORD OAGO17 
oaga ; 000 : Hon prgi7A 
° ’ 
page 000 _— “BORE 3 rh) 
7332 - WORD DHOOOA 
000 "BYT 0,0 
7939 [WORD  OH000B 
g000 000 "BYTE 2,0 
B001 WO BAgO2 1 
BO 000 *BYT 0 
8003 , DHO21A 
g004 000 BY 3,0 
DFOO26: : WOR 4 
000 BYT 0,0 
Wl DHOOOA 
g008 000 "BYTE 0,0 
8009 ‘WORD  OH000B 
8010 000 *BYT 0 
if 7 WOR HO026 
801 000 “BYTE ,0 
8013 DFOO27: :WORD 3 
8014 000 ‘BYTE 0,0 
8015 “WORD  OHO00B 
BO1B 000 ‘BYTE 2,0 
8017 O40356 2245 "WORD OnO0026 
8018 040360 607 000 ‘BYTE 7,0 





H1l2 
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CZR6EB.P11 O02-DEC-77 10:21 DATA FORMAT FOR PRINT OUT 


Bb43 B4B325 O°°BBS =o weeds EE 


8021 O40366 041250 _ - WORD 
Bspae 
nite o4e ; Hogp 37A 


a7 

at 

3 

2 

fu 
ee 
Oo 

ze 

S 


040400 003 ete : 
1S i ewe mee 
8030 40410 000 oo0 CFO: TE 60 

l2 o41250 “WOR OXO008 

14 539 000 “BYT 2,0 
80 16 oO42405 ‘ DHOO4 1 
8034 Ries al 000 i -BYTE 0 os 

000 * =" BYT : 
pFog4e: ‘WORD 4 

8038 040430 000 000 ‘BYTE 0,0 
8039 32 041250 WO! HOOOB 
Bt Ee cet = ™ BS feboe 
Bove o4o44e 042171 _ BYTE Sap21A 
goug pean 000004 _ DFOO43 BYTE qo 
BO46 op 000 “ "BYTE 0,0 
8047 O404S2 041250 ‘WORD OH000B 
85 49 g 042145 _ “WORD Bap021 
spe meee oe Bageis 

64 00 000 ‘BYT ,0 
Boss Daduee 000035 000 ra oe 
8055 O40472 O41232 . DXOO00A 
BO5B guguze ow 108 000 BYTE 0.0 oe 
Bbea pdoeoe 041808 000 BYTE 2 oe 
Boe3 bude ma 008 —_ Bye DHOO4F 
BObe ous 19 Oe 000 ‘BYT 2,0 

1 4 DFOO4S: [WOR 4 
8064 040514 ooo 000 "BYTE 0,0 
8065 O40516 041250 as - WORD comm 

i: : 
BoE? 041315 “HOR Be 04 
8069 a: _ FORD DHOO4G 
8070 040530 oo2 000 “BYTE : 
B07 pao 35 oo0005 nate pFooso: “ave 5 
07 p23 041952 OHOOGA 
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CZR6EB.P 02-DEC-77 10:21 DATA FORMAT FOR PRINT OUT 
8075 guosue 041250 .WORD DHOOOB 
8076 0544 002 000 ‘BYTE 2,0 
8077 os 041314 ‘WORD DHO04 

z oe 000 BYTE 0.0 a 
te 4 ried 000 ‘3 +4 fe 2,0 
8081 oo00004 DFOO6O: :WORD 4 
go8e 000 000 ‘BYTE 0,0 
B083 041250 . DAGOOB 

4 000 BYT 2,0 
8065 042520 “WORD DHO60A 
BOEE 000 000 ‘BYTE 0,0 
042545 ~ WO DHO&08 
BOBE 74 003 000 3,0 
B08S 76 oo0005 DFOOb1: :WORD 5 
8030 0600 000 000 “BYTE 0,0 
8091 0602 041232 [WORD OHO000A 
B03¢ 006 000 BYTE 0,0 
B04 gt ll 4 a8 000 BYTE prone 
pets die 000 “Bae prgON 
B69 16 041465 DHOO4G 
8098 002 000 e,0 
ooooos DFOO62: [WORD 
8100 0624 000 000 “BYTE 0,0 
8101 041232 "WORD DHOOOA 
810¢ O06. 006 000 "BYT 0,0 

1 041250 - WOR DxOoOB 
8104 O02 000 ‘BYT 2,0 
8105 O40636 041314 "WORD DHOO4 
8106 0640 000 ‘BYTE 0,0 
810 42 041502 “WORD DHOO4H 
8108 O40644 000 2,0 
8109 OuOb46 0000: DFO063 - WORD 5 
8110 000 0,0 
pits Buoeed ibe 000 Hone pABOOR 
8113 O40656 041250 [WORD OH0008 
8114 O40660 O02 000 "BYTE 2,0 
6811S O406 042572 “WORD OH063A 
8116 O40664 000 000 “BYTE 0,0 
8117 C4O666 042637 "WORD OH0638 
8118 640670 00s 000 ‘BYTE 5S, 


a — 


le 
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C2R6EB.P11 Oe-DEC-77 10:21 ASCII MESSAGES 


-SBTTL ASCII MESSAGES 
030768 OPROOI: .ASCIZ <15><12>/RK611 VECTOR ADDRESS ( / 


0440 042104 
1823 024040 


440 OOOO4O OPROOe: .ASCIZ ’ ) = 7 
| Beooes OPRONS: .ASCIZ /RK611 VECTOR ADDRESS ( / 
ait faaneo 
H OPROO4Y: .ASCIZ /RK611 PRIORITY ¢ 7 
1 4Se 
0 


OPROO6: .ASCIZ <15><12>72ND PASS RUN TIME APPROX 4 MINUTES/<15>< 12> 


Be 
APES 


119 
e133 
81 
We 
1 
6124 
81 
sige 
aE 
cigs 
gt 
f 
piss S004 arte 
8136 tees 1 S11 
8137 ines 1 101 051120 
gi38 133 411 oe 
8140 O41 Zot : : 
te ; pennes OPROO7: .ASCIZ <15><12>/4xeRE PROGRAM HALTED HB*£H#/¢15><12> 
ei Suites se? Saeed 
6814S 041102 O201 025052 
1 | Ritie 02 ae, 00001e 
814 1116 Oe SPACEe: .ASCIZ 7 / 
8148 OY1lel 01 oSool2 O47S22 ABORT: .ASCIZ <15><12>/PROGRAM ABORTED BECAUSE ERROR THRESHOLD EXCEEDED~<15><1l2> 
gig Bilge pga 
8151 041142 1 1 052501 
8152 041150 itt 2440 OS1122 
8153 041156 paid} 051110 
8154 041164 O51 047510 O42114 
61ss pul ace O04 Saeed 042505 
Bias 1 af S04 o000le 
4 mista Witvartad O42Se4 OS2l2e3 TSTBY1: .ASCIZ <15><12>/TEST 7” 
8159 O41216 O41040 OS0131 OS1S01 TSTBY2: .ASCIZ 7 BYPASSED’<15><1le2> 
8160 O4%1224 O4%e2S23 006504 o000012 


SEQ 0153 


Kle 


10:43 PAGE 153 
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DATA HEADERS 
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“XN  * 
= be 
>. z z 
- a an 
i) oO Oo 
a oO oO 
w 
a 
oO 
> 
wy K 
a ao ao 
te 
aA 54 5 
tu w w 
= a J - a 
wv x ac ht i) 
a eg a fas} {ee} 
= . 
‘ v ofl * . “‘\ “\N al 
i' 4 By az _ -_ tc © “‘\ ~*~ * ac ot “4 
'<t en ee 8 8 & 88 8:3 a a 
= oOo oOo oO = 4 a4 x x x =< x oO x =< 
Ww a FF ad ge ge ec ge ge ge eg ge a [8 a4 a 
— i 
ww = w _— & oO = = = oO la oO | a = oO 
Cc ww P lJ 7 x = =< x x = x x =< x =x x 
Ww be VT) ec ec ec a ge ge ge ce J ge ec 
2 ‘X ™~ ~~ *% ™ . 3% ‘XN ‘X\ * ‘XN . 4 XN » 2 X\ S 
+ ™N N N N N N N N N N N N N N —N 
me mt onl be at mt om ol _ rt ons onl + bt et | oe | 
<3 393 88 8838 8 8 $8 8 8 3 3 
g¢@eqe¢eeteegeee €F ee : ¢ 
4312 @o « € &€4 6 &24 & .— «o 2  « a a 
be 5 oOo oO Tr Tr T Tr 7 b FS Tr Tr Oo Oo Oo 
#8 88 83 8 B@SBhHiaegs 8 8 
ow oOOFTwW OMMTFT lM WM WM WM MMO O =—M ON% WMOOWD- wWrmHOOOk mm 
Bin ange cans ee nin Nin tig “ine é: S2 O R=omu ee unin 
Nz 30 82 82 G2 Gag 88 SZ Sz Baar srruew sz 
9 im tu TrmOuUO oO mo 
mae Witetet Scie Acie ae FE =z a & SPAN Gaohas bind 
ater! + mt at ee oO Us te 
ia § ZZ 28 28 28 £8 23 Ze Be8za2 Eeusez 23 
Cet eee ae tae e a 7: 
4 Com Rent ee enad 
aH i a 3 
z 3 f Zua 8 
SER RT U Metal a amr PSL BLN lek aan te fe tate mee ete 
mr) oOrTTTITITT r7TT LNLnNin OO000 


setedctedetotetebutasasutahababesusesutmbedndeeed ebeeaeeet meee eee ee ee eee 


DSESLSESSSASASSSLSSSESSSSSSSLSS0E0E0000000000000000008 
BIGDODSDORRARRRR ARR BOTBDOBS BORTOTOT ORE POO OOO ooo sett 


SEQ 0154 


Lie 
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CZR6EBO RK611 OSKLS CTRL PRIS 
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OF GuTo0 uaF ao 
=O z, FSuno “non 


O4 
004 
1 


22856 


~ 
be ~ 
“ z z 
: 5 S 
ao (s) ax 
te 
z all 
lJ tu > 
w i] oO 
WwW - a 
ge el x 
a fe] ge 
- 
z 
lJ et 
w ! oO 
WW = 
ge oa x 
a ao x 
“ oa 
all } 
az \ la 
p> | az w w 
- a J loot a 
2) » 4 ec bt =< 
az it 4 a @ ae 
be 
i od z be ~% 
oO lw Lon! L ool te 
WW z w ao \ = z a 
a a J Re lol com | =a la 
x< =x ge Cl ~ oO oO x 
ivy) ge a @ a oO oO ge 
| afl J ail - Ww 
az >~ az “4 fea a a %w 
b | V9 a gc | oO oO w 
- Q Lo = - vt) la oO 
oO x oO = Oo =< = x 
cz ec az a cz ec gc a 
- ail e L ol te w 
2) > oO 4 oO a a “4 
lw VY lw ec la é) oO w 
a a a oo a WW WJ oO 
x = x = x x = x 
la c lw ge WwW ge ec x 
~*~ ‘XN . ‘X\ ~~, \ NX X\ 
N N N N N N N N 
bh be i ol con Lol ons on! lol 
oO te Yo oO oO oO oO oO 
w w w w w w w w 
cz fe q az ie « az cz az az 
. cz ‘ leg coal cz @o w 
| og + 4 i cw “4 ~~ fav) 
cond com 8 -_ oO tw tw Oo 
g a ‘ 2 2 ¢ ¢ § 
a a a a a 
o00r wWmo “7 ~ SIN at = mmoce 900 w Qn ORO ONMO?, pond 
Bozum Me f 
=n of 
z oe 8 


faa ba 6 ee ee 
=9889 = ae if Smt 32 
SF isd Te ee i a 


Bisel REMeGeeeld Beceic EEacieas” Od tal a tera 


SURE ReRA OR TREN panos sees vane sna 


pO naitaaaidnannnay fueueunucurucd 


SSA AA AS AAA AA SAAS SSS ASSES ASSESS ASSES LESSEE ESSA ISS LESSEE 


TAGS SaaS Souae MuUNNNSSeN RUNNER NNN SS MRMER ENS 


es 


CZR6EBO RK611 OSKLS CTRL PRTS 
CZR6EB.P11 O2-DEC-77 10:21 


te ONssa5 047507 042117 


8306 O4ebce OS0e 033461 
Se RES come 
ST BEE oooh BMRB 
8311 ered OS344 20104 
83le O04 051117 020104 
8313 O4%e666 OS3440 020104 
8314 O42674 O42101 O51040 
6831S O4e 000104 


MACY11 30(1046) 
DATA HEAD 


020040 
020104 
047527 


040S05S 


DHO37A: 


DHO378: 


OHO041: 


DHO4Y 1A: 


DHOBDA: 


DHO6OB: 


DHO63A: 


DHO63B : 


02-DEC-77 
ERS 


-ASCIZ 
-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 
-ASCIZ 


-ASCIZ 


-ASCIZ 


10:43 PAGE 15S 
/GOOD BAD WORD/ 
/WORD WORD NUMBER/ 
ZEXPECT ACTUAL EXPECT ACTUAL BIT’ 
/RKECPT RKECPT RKECPS RKECPS COUNT’ 
“/RKCS2@ BUFFER , WORD/ 
/ WORD READ/ 
/RKCS2 BA17-16 BUFFER BA17-16 WORD/ 


e 


BUF WD 


WORD WD READ READ/ 


SEQ 0155 


CZR6EBO RK611 OSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 156 SEQ 0156 
CZR6EB.Pil O02-DEC-77 10:21 ERROR MESSAGES 
315 -SBTTL ERROR MESSAGES 
Bais 2704 paz ies 054105 EMOOO: .ASCIZ /UNEXPECTED MEMORY PARITY ENABLE TRAP/ 
831 sole 10 pei’ 046440 
8320 7 051117 020131 
8 78 one oS4Se4 
8 7. 4 16 046102 
B33 tees 1 lle4 050101 
8 iste? 1 Salis 051117 EMSOO4: .ASCIZ /ERROR AFTER ATTEMPTING IMPLIED SEEK/ 
be ie 
83. 360 7111 020107 
8 11 1 O4eS511 
8330 104 04SS0S 
8331 3014 000 
83. 3 1 1513 030523 ESOOYA: .ASCIZ /RKCS1 IN ERROR/ 
8. O444 1} 051105 
35 Bue 1115 O20061 ESOO4B: .ASCIZ /RKMR1 IN ERROR/ 

th, 04 Bar itd O4e440 051122 
83. 1 13 O3112@2 ESOO4C: .ASCIZ /RKMR2 IN ERROR/ 
Ba i 0S1105 

l S 1115 O20063 ESOO4D: .ASCIZ /RKMR3 IN ERROR/ 
Bs Bie Ey Meg Oise 
8344 3111 122 042513 O20122 ESOOYE: .ASCIZ /RKER IN ERROR/ 
8345 043116 O47111 O04 O0Silee 
B34? B43157 081132 11 0101 ESOO4F: .ASCIZ /RKBA IN ERROR/ 
a a i 
8350 D4a14s le2@ 053513 020103 ESOONG: .ASCIZ /RKWC IN ERROR/ 
Baad bad per its O4e440 051122 
S325 u3ie3 1 it pera kz EMSO1O: .ASCIZ /ERROR ATTEMPTING TO READ HEADER SYNC (PREAMBLE) / 
8355 mH 176 1 111 020107 
8356 04 051040 O40S0S 
8357 Bisele 1 Soros pig 191 
8358 11 1440 047131 
8359 BISSes te sy pacece 
ea ae O46 1 4505 
8362 oss rhs | 051117 EMSOl1: .ASCIZ &ERROR ATTEMPTING TO DO HEADER READ/COMPARES 
8363 o404 1 046S0S 
8364 O43256 OS Ai) 020107 
8365 Risss. 04 0 020117 
8366 O432e72 O42510 e101 051105 
8367 043300 O51040 O40SO0S 027504 
Oc eee 
8370 043316 O4SS22 O41504 046131 ESO11A: .ASCIZ /RKDCYL OR RKDA IN ERROR/ 
8371 O43324 O47440 Oe0le2 O4SS2e 


B13 


10:43 PAGE 157 


SEQ 0157 


)_ 02-DEC-77 
MESSAGES 


MACY11 30(1046 
ERROR 


S CTRL PRTS 
C-77 10:21 


02-be 


CZR6EB0 RK611 DSK 
CZR6EB.P11 


-ASCIZ /ERROR ATTEMPTING TO WRITE DATA SYNC (PREAMBLE) / 
: .ASCIZ /ERROR ATTEMPTING TO WRITE DATA OR ECC/ 


: .ASCIZ /ERROR PTTEMPTING TO READ GAP/ 


EmsO1S 
EmsO20: 
mMSO21 


pot ea ‘- SOSNS os ae 
con Kem eee Rome I Ce em | ~~ 


/MR1 INCORRECT ON 1ST DOWNWARD TRANSITION OF MAINT CLOCK/ 


-ASCIZ /ERROR BETWEEN SECTORS ATTEMPTING MULTI-SECTOR WRITE’ 
-ASCIZ /MR1 INCORRECT ON 1ST UPWARD TRANSITION OF MAINT CLOCK/ 


: .ASCIZ /ERROR IN ECC CENERATION/Z 


N 

Lond 

Yo 

w 

=< 

<¢ 9 ; 

cw oO com cf 

oa 

R OF z = 
UMW) m— Bz =o mom 
te are Sate Beane none it 
zi Pramas eeens suas eos 
zuusezouussez 


pap pf pee ry Set ated NSTOUT = 36528 
pumas 2 — chide 
tt Peete Ph ee Gus = reer 4 

Cole Ucar agansaetin aes sirens sumarasee 


Bat Dubna eoee enisnu abla uanasunsenansnasossOemsce?y Te 





EESSLoSSoRSoRSooSoSS 


-ASCIZ /MR1 INCORRECT ON 2ND UPWARD TRANSITION OF MAINT CLOCK/ 


Wists 
one 


84a 


225 
ESshniihhihhabnbiia ann hbeeeeees te reeteeertires eects 


CZR6EBO ve OSKLS CTRL PRTS 


CZR6EB.P 


PEPLELELEL ILS 
Ee Fae R ASE e ES 


22 


sageaaae 


sate 
Eee eee 





=F) 
Bt ee he ee 
EUS 
£ 
- 
- 
N 


O02-DEC-77 10:21 


é 


ak 
BaSee 


REPRISE 


: 





ea 


2992 
a 


1 
47 
eh He 
8474 
8475 031 0200S4 
84 117 
3 
es iS fcaee 
8480 1S 41 
8481 O44S2e0 OS2103 042105 
8482 O44S 046131 O47111 
8483 O44S34 O20le2 053117 


MACY11 30(1046 
ERROR 


_ 
rarer 
a 
=) 


a ee 
pewee Soa 


de 
Row 


) 
ME 


EMWY: 


EmMSO26: 


ESO26A: 


EmSO027: 


ESO26B: 


EmMSO30: 


Sy al 10:43 PAGE 158 SEQ 0158 


SSAGES 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


/MR1 INCORRECT ON 2ND DOWNWARD TRANSITION OF MAINT CLOCK/ 


ZEXPECTED CYLINDER OVERFLOW ERR DID NOT SET/ 


/WRITE TO CYL 632, TRACK 2, SECTOR 2S, WORD COUNT 4017 


/UNEXPECTED ERROR WHILE TRYING TO FORCE CYL OVERFLOW 


/WRITE TO CYL 1456, TRACK 2, SECTOR 2S, WORD COUNT 4O1/ 


/UNEXPECTED CYLINDER OVERFLOW WRITING LAST PHYSICAL ADDRESS/ 


SEQ 0159 


D13 
02-DEC-77 10:43 PAGE 159 


MACY11 30(1046) 


CZR6EBO RK611 OSKLS CTRL PRTS 


CZR6EB.P11 


ERROR MESSAGES 


O02-DEC-77 10:21 


-ASCIZ /UNEXPECTED ERROR WHILE WRITING LAST PHYSICAL ADDRESS’ 


EMSO31: 


ee 


SNOUT OOF 


eas Sane 
“ PaRF 


a= TO 
a 


-ASCIZ /ERROR ATTEMPTING TO READ DATA SYNC (PREAMBLE) / 


EMSO32: 


-ASCIZ /ERROR ATTEMPTING TO READ DATA OR ECC/ 


EMSO34: 


w 
™ 
Oo 
wn 
= 
uJ 
oe PPass Punetss Nerade=eat ak 
a 7; -_ wut “aT -4-4 
az & 


-ASCIZ /ECC ERROR IN READ DATA OPERATION’ 
-ASCIZ /ECC REGISTER NOT CORRECT AFTER ECC READ IN READ DATA/ 


: .ASCIZ /ERROR IN ECC PATTERN CALCULATION AFTER ECC ERROR/ 


: .ASCIZ /DATA COMPARE ERROR AFTER INPUT NPR TRANSFER/ 


2440 EMSO3S: 
2 EMSOY1: 
Emso4e 


vampaen nea 


=aans ae co Reece oie 2 es ne 
=O “Od 
Gi aiea toe = S408 


a 


mice 


cs aaa 





esestateetttitnncet 


una Baa 
eveenennnenees gaa 


EgneERO RK611 B3K Ale PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 160 SES 0160 





ZR6EEB. P11 77 10:el1 ERROR MESSAGES 
8S40 040503 
oo 101 
4 101 
4 1505S 
gave 7522 
55H peoiss EMSO43: .ASCIZ /ERROR IN ECC POSITION COUNTING AFTER ECC ERROR/ 
48 pa 302 
: Gi7eb3 
a tt 
e554 440 
Bead Dalit? EMSO44: .ASCIZ /ERROR AFTER PROCESSING DATA CHECK ERROR/ 
ES 920197 
6s 1440 
essg 042440 
ea Oaz814 EMSO4G: .ASCIZ /TRANSFER LENGTH ERROR ATTEMPTING PARTIAL SECTOR OPERATION 
40 
8564 40 
Beee 114 
8 7 
B5es Ogee 
8572 te EMSO47: .ASCIZ /BAD SECTOR ERROR DID NOT PREVENT DESIRED ADDRESS INCREMENT/ 
ae 00188 
ae Oe310s 
B78 104 
83 ae 
83 o1ig3 
geet later EMSOSO: .ASCIZ /BAD SECTOR ERROR DID NOT CAUSE CERR TO SET/ 
e585 aa 
e584 Beei17 
le 
Es ae0iee 
e583 eae EMSOS1: .ASCIZ /BAD SECTOR ERROR FAILED TO SET WHEN EXPECTED 
Beas 2 Begise 
8 1l 2105 
8s33 17. O42Se3 
8s34 27 047105 
esss 30 041505 


CZR6EBO — OSKLS CTRL PRTS MACYI1 a a ad ale 10:43 PAGE 161 SEQ 0161 





CZR6EB.P 02-DEC-77 10:e21 OR MESSA 
8596 
} el Son0 EmMSOS2: .ASCII /DATA TRANSFER DID NOT CONTINUE TO END OF SECTOR’ 
8s 104% 
see 
Bene 047105 
8603 ett 
ie gyeei6 .ASCIZ <15><12>/WHEN BAD SECTOR ERROR OCCURRED/ 
0S1117 
051117 
fi 0S11e5 
B12 Denies EMSOS3: .ASCIZ /ERROR ATTEMPTING WRITE CHECK OR ECC READ AFTER WRT CHK/ 
861 344 
Bel peas 
gels 047440 
18 020103 
861 Ros 
gig 40 
861 045510 
ges? O4244O EMSOSH: .ASCIZ /ECC ERROR IN WRITE CHECK OPERATION/ 
Bees paso 
eer Ostids 
ll 
Boog 030113 EMSO60: .ASCIZ /WRITE CHECK ERROR FAILED TO SET IN 16 BIT MODE/ 
201 
86 
8550 3105 
86 ey 40 
86 124 
8634 O%6e 04751 000 
BPs edt EMSO61: .ASCIZ /TRANSFER LENGTH ERROR WITH WRITE CHECK ERROR/ 
8637 O4631 HS 4 042440 
Bese GMesle Selice 3440 
lll poate 
8640 OSelill 4103 
qe 4728 051105 
8643 disc pe0108 EMSO63: .ASCIZ /WRITE CHECK ERROR FAILED TO SET IN 18 BIT MODE” 
8644 1 O1l 
Beis Giese, O51105 Gee? OeUlse 
8647 402 pegscR tts pigi03 
SENS 410 020124 047111 030440 
8649S O46416 020070 O44S0e Oe0le4 
18) 424 047515 O42S04 000 


CZR6EBO RK611 OSKLS CTRL PRTS 
CZR6EB.Pil -77 10:21 


02-DEC 
8652 046432 
8653 
ae 4 
BEee 
8657 432 
8658 432 121105 
8659 O46434 150442 
8560 046495 OeYees 
8661 O46 132110 
442 055044 
444 026422 
8664 We 013211 
B65 105504 
8666 ube O4eg42 
8667 454 021321 
8668 456 110550 
8669 460 044264 
8670 Woe G22132 
B71 464 011055 
8672 O46466 104426 
8673 O46470 O42213 
8674 
8675 
oe 
Bera ONEN?S 133333 
8679 046474 Ob6b66 
8580 O46N76 155555 
Bese Ouescs 133333 
8683 ObeebE 
8684 066665 
8685S O46510 155555 
8686 12 155555 
868 19 133333 
goss 46516 | 
8689 O46 133333 
8690 O46See 133333 
8691 O465e4 133333 
8692 046526 133333 
8693 046530 133333 
8694 
8695 
8696 
8697 046532 
8698 O46532 177777 
8699 534 17777 
87 28 77777 
8701 54 525 
8702 O46542 O5e5e5 
8703 O4654 2525 
8704 6546 177777 
8705 6S 177777 
8706 O4655e 052525 


O46SSe 
8707 O46SS4 


MACY11 30(1046) O2-DEC-77 10:43 PAGE 162 
ERROR MESSAGES 


;* 


PATe2: 


PAT3: 


PATY: 


s VEN 
. SBTTL bATE PATTERNS AND BUFFERS 
;% PATTERN A 


1 - ALL ZEROS 
PATTERN @ - ROTATING CELL PULSE PRECOMP 


: 


—-O00r- 
Rau 


r 
un tO~vs 


OoO--O00rO 
£O~vut~r 
we 

Mr 
—MUTWO UT 
wo 


PATTERN 3 - MAX PRECOMP PHASE MIX 


O0SeSeS 


SEG Olée2 


CZR6EBO RK611 OSKLS CTRL PRTS MACY11 30(1046) O2@-DEC-77 10:43 PAGE 163 SEQ 0163 


CZR6EB.P11 O02-DEC-77 10:21 DATA PATTERNS AND BUFFERS 

Gi Ree tees a 
gets Bue 4 177888 1772S2 
871 6566 17276 172765 
er i3 046570 172765 172768 

aoie ;* PATTERN S - ALTERNATING 1°S AND 0’°S 
Lh tA ;* PATTERN & - COMPOSIT ROTATING 
Z ra PATE: 

2 72307 072307 
es pbere estes ‘ 135143 

87e2 O46576 156461 156461 
8723 046600 167230 167230 

5 Seed DaBeue 

7 8 1672 

7e7 O46610 107351 107351 

8728 O466le 143564 143564 

87. 14 1672 061672 

Z 0735 030735 

731 1143 114356 
8732 O466e2e 046167 046167 
8733 O4662e4 123073 123073 
87 Bupe 151453 1$14S3 
Be S O466 164616 164616 

Brae ;% PATTERN 7 - ALL ONES 
8739 O4%663e o00402 IBUFF: .BLKW ‘Oe 

8740 047636 9O0040e OBUFF: .BLKW 40e 
8741 000001 - END 


a 


Oo 
N 
D 


S telionn 1 aeell amet 
oO 
nunnnnnwn 


B 


4 


a erErEErE 


eee 
ee 


BR 
5 








O RK611 OSKLS CTRL PRIS 
O2-DEC-77 10:21 


0S38 


180 


WW WW) 
pehaee 


latstafatatal 
Corr 


WWWWW 
OTT ROOT 


WWOWDDKKDWW WWWWWWLIWWW) WWWWWWWWWW) 
DEK POOPIE UVUET OOOO OOrrrrrro 


ee NN ee ee ee ee ee ee ee ee ee ee 
ss 


—-NWOW 
—-WOUID 


MACY11 30(1046) 


ae 
WWWWWWWWWWWWWWWWWWWWWW) 
mF CWMOM CWO £lWWOre Ce 
WOO-WONWDDU SMUD £-O£ODONDOM 


eas 
ar 


<a 
a ee NNN ee 


NWWWWWWOOOTNU 
O5COMEH-ul 
MOWOWOwW& 


* 


PAGE 165 
CROSS REFERENCE TABLE -- USER SYMBOLS 


SES 0164 


CZR6EBO RK611 OSKLS co on MACY11 Ug O2-DEC-77 10:43 PAGE 166 SEQ 0165 


CZR6EB.Pi1 O2-DEC-77 10:2 OSS REFERENCE TABLE -- USER SYMBOLS 

Bale = 900400 1096 

BAI7 = 001000 10978 

BITCNT O02e326 17368 2930% 2947" 3060* 3077% 3193% 3210* 3324" 3341% 3455* 3472" 3586*  3603% 
3718% * 4O4le 4OSe* 4172% 4i89e 46a4* 4651s S4see Syage 5496e SSii* 5554 


602e# eos" 6037% 6061% (372% 6084* 6096% 6183* 6ele 6e2e0% 6239 6265S 6272# 


6274 ? 6290 6295 787 7877 7883 7886 7893 7896 
BITO = o00001 9978 1093 126 145 286 416 3547 4133 4909 5006 sses 5590 sess 
5904 5930 6197 6253 6323 6761 
B1700 = 000001 9878 997 
“ELIBE = Sapte ee 
= 
| BTtbS = Boon%0 9848 954 
BITOY = 000020 9838 993 
| BITOS = O00040 9828 492 
BIT06 - 900190 3818 991 
| BITOS = ens gas gg9 6915 
| BITOS = 001000 9788 988 6933 7098 
| BIT] = OO00002 9968 1127 3417 4134 5360 6394 
_ BITIO = 002000 9778 1098 1117 1136 1169 1184 6418 6420 7075 
BITii = 004000 9768 1099 1118 1137 1154 1170 1185 3283 3413 3544 4130 6940 
| BIT1e = 010000 9758 1101 1119 1138 1171 3284 3414 3545 3548 4131 S660 
| BITI3 = G20000 9748 1102 1120 1139 1155 1172 6414 6416 7082 
| BITI4 = 040000 age 1103 1121 1140 1156 1173 3284 3414 3545 4131 5564 5834 6230 
BIT4S = 199990 9728 1194 1105 1122 1141 1157 1174 4395 SS64 5634 6762 
'BIT3 = 000010 gas 1110 1129 1148 
BITY = 000020 9938 1111 1130 1149 1163 1178 6414 6416 
BITS = OOO04O 9928 1112 1131 1150 1164 1179 
BIT& = 000100 99i8 1094 1113 1132 1151 1165 1180 2887 2889 2891 3017 3019 3021 
3150 3152 3154 3284 3414 3545 3675 3677 3679 3998 4000 4002 4131 
4590 4552 4egy 5210 S212 5214 SeS4 
BIT? = 000200 9908 1095 1114 1133 1152 1166 1181 
BITS = O00400 989% 1096 1115 1134 1153 1167 1182 5658 6418 6420 
BITS = 001000 9sse 1097 1116 1135 1168 1183 1980 098 2215 332 2YS 3283 3413 
3544 4130 5388 S4 54 S41 S4es 430 S473 526 556 5599 5651 
| 5703 S765 5814 £968 5978 6043 6106 6355 6372 
| BLODAT 032014 1926 2044 2161 2278 2399 2514 2597 2685 2792 2879 3009 3142 3275 
2405 3536 3667 3798 3903 3990 4122 454 4349 4483 4576 4712 4803 
BSE = poDe0d 1338 4417 19 
BSEDES 002352 17468 1914% 2034* 2151% 2268% 2386% 2503 2586*% 26708 2777% #+(2865* 2995* 3128% 
3260% 3391% 22% 3653% 3783% 3898* 3976% 4108* 42e39% 4336" 439S* 441ll* 4469s 
4564 4699% 4790% 489S* 4992% Soss* 518S* 5574 5576 5577 
CCLR = 100000 11058 1912 2032 2149 2266 2384 2504 2587 2671 2778 2866 Page 3129 
3262 3392 3523 3654 3784 3889 3977 4109 4240 4334 4493 4597 4722 
4813 4914 5011 5039 5217 
COT = oO2000 10988 
CERR = 100000 11048 2557 2643 2967 3097 3230 3361 3492 3623 3755 4078 4209 4439 
| CFMT = 010000 11018 1978 2096 2213 2330 2397 2451 3794 3899 3986 4118 4708 5093 
| 5366 5386 5566 4 5677 5879 5890 6187 6226 


5648 
espn = 104407 6900 7071 7097 78558 


| 





K13 


CZR6EBO RK611 OSKLS CTRL PRTS MACY11 30(104%6) O2-DEC-77 10:43 PAGE 167 


CZR6EB.P11 O2-DEC-77 10:21 CROSS REFERENCE TABLE -- USER SYMBOLS 
CLEAR = O0000S 10788 
CLRIBF 031770 2683 2790 2877 3007 3140 3273 3403 3534 366S 
¢ ry ‘. 4347 At, 4574 4710 4801 5194 66088 
— 
C = Boo01s Size e7s 7285 
er, = 000200 aase 1830 7246 7285S 
= 
Thar" Seow a 
pee = 190008 11418 2975 3105 3238 3369 3500 3631 3763 4086 
ail =1 9198 1264 1793 
DO = gon oe 11538 
DF O00 0026 1370 79098 
pe Ope: Hed 1385 1487 1577 1637 1643 79118 
DF 1 1397 i498" 79338 
BF OOD? B41 se 1403 1481 79438 
ODFO010 O40156 1409 14e1 1439 1517 1529 1619 79538 
DFOO11 1415 1427 1445 1457 1469 1523 1541 1631 739638 
pe pet Je 1433 1595 79758 
DFO0017 02S6 1451 79858 
DFO0e1 0302 1463 153S 1625 79958 
OF 040326 bd33, 1499 1505 1511 800Ss 
Broo 7 Byases 1S47 80198 
Rene fine tees Bt 
i 15 80298 
DFOO4Ye O40426 1565S 80378 
pees Ree 1571 opase 
66 1583 160 80538 
DFOO4S pipes 1589 1613 80638 
DFOOSO 0S3e2 1601 80718 
OFOO6O O40SS6 1649 80818 
DFOO61 040576 16SS 80898 
pF 0622 1664 80998 
0646 166 81098 
DHDCMP 024276 1943 20093 2061 2127 2178 2244 2e98 2361 2416 
2803 2307 3037 3170 3301 3432 3563 3695 3815 
4366 4403 4S07 4611 4736 48e7 4928 50e5 5118 
DHOOOR 041232 1497 154S 1557 1S63 1569 1587 1611 1647 7913 
79658 7977 7387 7997 8007 g0SS 8073 8091 8101 
DHOOOB 041250 73iS 7927 7937 7947 7987 7967 7979 79893 7999 
80393 47 8057 8065S 8075 8083 8093 8103 8113 
DHOOOC 1263 4208 81688 
DHOO17 1773 991 82338 
DHOGel O42145 8001 41 8049 82528 
DHOGe6 =OY4ee4S 8011 8017 Beb4s 
DHOOY 041314 7917 7929 7939 7949 80s3 8067 8077 8095S 8105S 
DHOOYA = 041333 7319 8079 81768 
DHOO4B = 041351 7931 81798 
DHOOYC 9 041367 7941 81828 
DHOOYD 041405 7951 818Ss 
DHOOYE 041423 7921 7973 81888 
DHOOYF 041450 8061 81928 
DHOOYG 041465 8069 8097 81958 
DHOO4YH 041502 8107 81988 
DHOO41 O4e406 8033 82818 


37%6 


4217 


81738 


SEQ 0166 


3901 3988 4120 


4679 


eS31 2614 2702 
4018 4149 4271 


7935 7945 7955S 
C1s 8021 8031 


L13 


kEReERO RK611 poke CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 168 SEQ 0167 
CZ2R6EB.P11 Oe-DEC-77 10:21 CROSS REFERENCE TABLE -- USER SYMBOLS 
DHO10 1517 7959 7969 82018 
pein Be 1$63 7961 82088 
DHO198 1631 7971 82158 
DHO14 1677 798 Beee 
pie a 1 ] 798 8ec8s 
017A O4e05 7393 8e4es 
pris 18 shh 8003 8043 82568 
13 8051 82608 
pies $3 8023 82738 
78 3S 80eS 8e 
DHO4Y1A e4Se 8035 82878 
HOGDA 2520 808 8234s 
esus 808 82988 
P55 ails 83028 
DHO63B 04263 811 83098 
DI = 040000 11038 
DISEEK 023334 1931 2049 2166 2283 404 2519 2602 26390 797 289s 3025 3158 3289 
sere geek goes 508 3308 400 4137 4eS9 4354 4495 4724 4815 
491 01 106 2 $3578 
DISPLA 001142 le64e 1793% 1801% 6955  7074# 
DISPRE 000174 11938 1801 
DLT = 100000 llees 
sac em es se ie gm ly TE 
4762 48S8 4889 4951 9S 504 504 S141 Si4e S 2eS6 $335 $336 
$371 5372 $393 S463 5488 5$83 5750 5788 6028 6062 6440 6470 6484 
6499 6525 $37 6549 6577 6580 6581 582 6583 S86 6587 S88 6589 
' DRA = 00000 114S¢@ 
ORDY = 00020 11S5e8 
DREAD 027176 <A ess. oven 3050 3183 3314 344S 3576 3708 3828 3933 4031 4162 
DRGPSN 026500 2707 2814 2e3le 3175S 330 3437 6 7 820 392 4023 41S4 
ao76 531 4616 4741 483 4935 2088 2798 236 2008s 
DROT = O00040 11508 
BRSYNC. 023940 ia5¢ 0 2057 1é3 174 2240 2291 2357 e41e 478 2527 261 2698 
c 
bape 590 3033 S166 237 3428 3859 3691 3811 91 4C 14 ai4s 4267 
4362 4399 4503 4607 47 4823 4924 $021 5114 S2e7 S4568 
DRYMSK= 000007 11098 
BSECTR B233i6 igs" 1937 2003 20S5 121 17 2238 2289 2355 410 2476 eSe5 2608 
BESe e803 e301 3031 164 525 3426 3557 3689 8093 3914 4012 4143 
4265S 4360 4397 4501 4605 4730 4621 4922 $019 Slle S2es 335% 
= 177570 9188 1263 1792 
OTE = 010000 11388 
pre = 000040 11318 
T 037510 1369 78648 
DTO004 037514 1384 486 1576 1600 1636 1642 78656 
DTO00S 037532 1390 8688 
DTOO00& 03754e 1396 78708 
DT0007 037552 1402 1480 78728 
OTO010 037562 1408 1420 1438 1516 1528 1618 7874% 
0T0011 037600 1414 1426 1444 1456 1468 1See 1540 1630 7877% 
OTOO14 037624 1432 534 78818 
DT0017 037640 1450 78838 
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CZ2R6EB.P11 02-DEC-77 10:21 CROSS REFERENCE TABLE -- USER SYMBOLS 
T 1462 1534 1564 1624 78868 
Br B37e74 1492 1498 1504 1510 78888 
DT0037 037716 1546 1648 78918 
TOO4O 0377, 1 78928 
TOO sk 8 
TOO 0377) 1 1 78988 
DTOO%G § 037770 1588 1612 1654 79008 
BTODES o40010 ieee paode 
Bue te O2eS2e04 1949 2067 2184 2301 e422 2S37 2620 $7318 
i nn en ie ae cane 
ECCGEN BS04Ge 2936 . 3199 3330 3461 3592 3724 4047 4640 S867 6214 62e4S 
py memo Te FRR pe pues ces me, mE fig, tame wees ou 
% * 
73% 779% 780% * 3016% 3149% 32828 4lee 3543% 3674% 3786* 3890* 
soniprte saais sears HSH Gouee Soars 4471% 44472x 44S89* 4701% 4792% $4897% 4994* Sos6* 
it 
335 peogg0 1i¢50 aaae Pies eats 5583 $750 5788 5886 5924 6028 6062 6276 6279 
ECH = 000100 G77. 2973 310 3367 3498 3500 3629 3631 3761 4084 4215 4217 
ATX 4 * * * * 3181% 3312% 3443" 3574% 706* *# 3931%  4029% 
ne — dieox Goes 4377% S21 * ieaes pL oo" pace anoee shea a" Sane. . 
* bd 
rorose onexso 6 gt gates GI Gt, Get Ge RR Re: 2 
477% 3485*  3575% 95 5 ae 3616% 3707% 3727% #3728 740% 374% a85ci 
932% *  44OSO# 4051 4063% 4071% 44161% 4181% 4182 4194* 4edes * 4378% 
esaee 462e3% 4643% 4644 4656% 4664% 4748% 4839% 4940# SO037# S130% Se43*# 6284 
% 
Ende 001602 tae 48x 
HO3 001622 { # 
Piiitce ote, TBE PE aro 
EMW ~ 001510 14488 1948% 1955* 2066* 2073 2183% 2190% 2300% 2307% 242le e4e28*%  2e536*  eS43* 
2619% e626 644S* 6475* 6489* 6504% 6530% 6542%  6554# 
EMW1 043644 6445S 84078 
EMWe 043732 647! 6530 84168 
EMW3 O440ee 6489 6542 84268 
EMW4 044110 6504 at 84358 
EMOOO§ 8 042704 1367 3188 
ENSO 042751 1382 138) 1394 1400 1586 83258 
EMSO1O0 043163 1406 14le 1442 83538 
1S a leet 
ENED p43a08 1454 1948 2066 2183 2300 e4el 2536 2619 83798 
fe 4 ae 1189 14 8 1955 5078 2190 2307 24e8 2543 2626 83878 
Si 14 14 1484 398% 
EMSO26 4200 1490 84458 
EMSO2e7 O44340 1496 84628 
MSO30 O44S1e 1502 8480 
EMSO31 O4460S 1508 84908 
MSO3e O4467e 1514 1520 84998 
EmMSO34 044750 1526 1$38 1634 850748 


CZR6EBO RK611 OSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 170 SEQ 0169 
CZR6EB.P11 


m m 


02-DEC-77 10:21 CROSS REFERENCE TABLE -- USER SYMBOLS 
EMSO. O45015 1532 85148 
EMSO3 5056 1544 85208 
eNSO4 ple 1556 3=Ss«S 28 
MSO4 17 1562 85378 
5 i568 4=s«sS 468 
mS 3357 1574 1580 esse 
Ee 2e5/ 1592 718 
MSOSO oubb14 1598 =—s_s« SB 18 
MSO51 5667 1604 85898 
EMSOS2 045744 1610 85978 
E 6064 1616 1628 1640 ©6118 
EMSOS4 6153 1622 #836 Bbel# 
EMSO6O 046216 1646 7% 
EMSO61 O4be75 1652 1658 86358 
063 6352 16645 686438 
ERRCNT 002314 17318 1809% 7175* 7175 
ERRVEC= 000004 10008 1791% 16ce* 6780 678:% 6801 6802 6828 6829 6833 6838* 68S50* 
685S* 6864% 6874* 62 6 6907% 6909% 6912% 
E.ASOF 002236 16968 
[BA © 002224 16918 4e98% 444Se 44446 4eS4# S269% S270e 5 3900 
E.CS1  OOe2c0 16898 1987% 1 10S* 2106 2erex 2223 2339% 2340 460% 2461 2e41*  eB4ex 
5g43 * E% * 2969 3096% 3097% 3098% 3099 3229%  3230% 3e31* 
3360% 3361# 3362 3363 349ix 3492% 3493% 34 3622*% 3603" 3624% 362 37544 
Se 3756" 37 * 39S52% 3953 954 4077% 4078* 4079% #4080 42e0e* 4eo9s 
W210% 4ell 4308% 4309% 4310% 4311 W4>4e = «44 4438% 4439% 4440 538% 4539% 
4S40x 541 4B70%  4671% 72% 4767% 4768% 4769% 4770 4e64*x 4865*  48b6# 
S392% S396 SSi3% 5514 S668%* S669 5777% +~S77P #580 S949* 5951 6055* 
6056 61 6328% 6 7865 7877 
E.cS2 002230 16938 
: DA ooeee6 16928 4y4i3% S674" S675* S680 S682*x S683* S685 Sees* S693 S698 7881 
- DCYL go2e40 16374 4412%  S673*% S689* S691 5697 7881 
E.ECPS OOe2e5e 17028 2940% 2944 3070% 3074 3203% 3207 3334*% 3338 #3465" 3469 3596% 3600 
3725* 3732 4OSi# 4OSS 4isex 4i8& 4e44e 4648 6284* 6287 6300* 6304 7893 
E.ECPT o02254 17038 2941 3071 3204 3335 3466 3597 3729 #+4OS2 4183 4464S S869 6216 
6269 6285 6301 B42ex b423% 7886 7893 
E.ER 002234 16958 2975% 3105% 3238% 3369% 3500% 3631* 3763% 4O86* 4217* 4419% 4679* 7898 
E-MRI1  O02244 16998 5393% 5407 S463% S467 £Suesx 5492 (%§SSO4 sSS83* S593 S6b2ex 5750x 5755 
S7ee% 5See6* S9e4* 602e8% 6033 6062 6067 +6076% 6079 6090* 6091 6208 6262 
6276% 6279% 6280%  6439* 44> «= B4S3% «64S4e 6459% 6464" 6469x 6472 £6483 6486 
gu97* 6498* 6501 6518% 6521* 6524*% 6527 £6536% 6539 6548* 6551 7868 #7874 
E.MRe oO02246 17008 1969 1993 2087* 2111 2204% 2228 2321% 2345 2442% 2466 5$378% SHIS 
E.MR3 o02250 17018 1983 1998 2101* 2116 2218% 2233 2335* 2350 2456* 2471 5390* S423 
Fae posses 17008 5276 5277 7902 
= * 
ESOOYA O43015 1383 1513 | 1425 1443 1455 1467 1485 1521 1539 1575 1599 1629 1635 
ESOO4B 043034 1389 1407 1419 1437 1515 1527 1617 83354 
ESOO4C 043053 1395 1473 83388 
ESOO4D 043072 1401 1479 83414 
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CZRBEBO RK611 DSKLS CTRL PRTS MACY11 30(1046) 02-DEC-77 10:43 PAGE 171 SEQ 0170 
é “Pll. Q2-DEC-77 10:21 CROSS REFERENCE TABLE -- USER SYMBOL 
1 158 60S 0s 83448 
Soo 43127 163 Peed 
145 165 1665 83508 
on oe 
bees seG8 «Buggies 
| Ee0se8 o444e4 4718 
FRTE. = 11308 
“Fseuw” Oge49s 19681982 2100 22032217, 2920 2394 aul aS $377 S388 bse 
| — a307 a23 6839 n637 sees a96E wee 956 S083 BINS S200 S398 ©5510 
ae oe encase U 1132 Iee3 5308 e313 iS an 7% ee S15 0 7851 7853 7855 7856 7857 
GO =: 000601 10938 284 3098 323130629493 SEAH 756382 4079214303 
GTSWR = 104406 lesa 0 7beae ‘abed' reps 
= 
HIBITS 002354 i7d7e «= be74e «= 2781s 2998 3394% 3525" 3656« 3787" 3892"  3979% 
uilie 4e4ge 49308 Gs65* Wades 4993" * 5153 5i6e Sib4s 
! S1a4% 6231 
HT 900011 Siow 7244 7285 
TeUFF ~ D4beoe 433° «2728 27 3003 399 30 3661 3792 3839 #«©3897 
| se ite SNS sa38 a7, er, Hero eh, he ig 
S063" SOB4* S091 Siso G2e4 4 S288—si«iwOSts«é 7G 
IDAE = 002000 11368 
IE. = 990100 10948 
IlF = 1 11268 
IAT tECe 00020 ieee 1774 1775S 
KiPARO= 172540 loses 6814 B42 
i= 
KIPARI= 172342 10398 
KIPARe= 172348 10408 
KIPARS= 172346 10418 
KIPARG= 172350 10428 
KIPARS= 172350 10438 
K pane 172354 10448 
KIPAR?= 172356 io4Ss 6858 
KIPDRO= 172300 10278 
KIPDRi= 172302 10588 
KIPDR2= 172304 10298 
KIPDR3= 172306 10308 
KIPDR4= 172310 10318 
KIPDRS= 172312 10328 
KIPDR&= 172314 10338 
CpPOR?= donate iis 7279 ~=S« 7285 
= 
COADRK 032 2675 2782 2869 2999 3132 3265 
—_ 3348 e036 e123 e334 Youy 4339 4473 4S66 4702 4793 
yess «24896 )~=—Ss«B 087 begee 
L.ASOF 002272 17148 6697% 67le2 
"BA OO BBB 17098 6694" 6707 
Ci¢51 002260 17078 1978 ©1987 2105 2330 2339 2451 2460 2966 30% 
3229. «3360 «© 3491 5754 §208 #49208 4424 sae Se70 476? 
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CZR6EB.P11 02-DEC-77 10:21 CROSS REFERENCE TABLE -- USER SYMBOLS 


4864 5360 S366 5386 $392 $513 SS66 5648 5668 5677 5777 5879 5890 
$949 6055 6187 6226 6328 6394 6699% 6713 


ce, fee IR a EY aes sre gee 

L.0S pose66 i7iis ig? S| (Beri 5328 e44 days BeeS | hees «= eee” = BBE* 878 

thm Boeete ER Ege Asal Tete Seach Fame 

L.MRe piste 17178 

LMR 17188 

LC: WC i088 6695" 6706 

cress pein ere see on SC 

ai” a ton B51 536 gos? esus=SsiS7?)~—sSBO)CeeBe)SCeSBe CSB 

MEMBAS= 172100 10488 6 

reveon Seuss Hie GFE g7e0e cans 

Reno's Bibby ices deb EES" SO 

SMSK= 17 tieis 

MEWD= O0e000 J1g98 5393 SHS SHBBSSBZ_ S750 S788 6028 6062 6439 6454 6459 6483 

MIND = 000200 11668 

MSP” = ObOICo ijeee 5335 

sages ope: ea en, a nn no ad 

me .BIT 915809 17358 S7eSe SESex S806" S936x  bYbe 6467 7883 

M o4 11188 

Mee? o30004 HED int 7 74 Sl 59 7 gaye e2885* 2897 eeo* 2891% 
SAC A SCE ORM EO CMS OS 
ee a ee a 
ube’ uaags «TiS © 4der* «chadE doce. «deh =| eBRGEeTeT* «BGP cBGGE | SBdex © S210 

peat s Selex Sel4e S265 SENS 6182 = Bex Be 6624 6664 87408 

OfsT = 990004 11478 

2 11398 

OPROOe §B4aze4 igss feds” «ese SB ebe 

ROOS 040732 1846 681278 

geaote Bivogs fey aia 

OPSTRT Oaee74 1929 Sou7" 2164 peel « a4o2Ss«BS17—Ss«P6ODSs«PBGS79HSCCéPBGH «= «3024 «= «3157 3288 
3419 3550 3682 3802 3907 4OOS 4136 4es8 4353 4494 4598 4723 4814 

‘ 418, «501e@ = 5105 SelB = 6706s 
Fema” Beate tee" creo 7 
PARM 002360 igs fers 08 


CZR6EBO RK611 DSKLS CTRL PRTS MACYI1 30(1046) O2-DEC-77 10:43 PAGE 173 SEG 0172 


CZR6EB.P11 02-DEC-77 10:21 CROSS REFERENCE TABLE -- USER SYMBOLS 
PAR. EN= 198s 6787 
PA = 11638 
PAT 4 66 86578 
PAT 47 6656 86778 
PATY 225 6652 978 
PATS 6641 87198 
PCA = 11708 6453 6469 6518 
PCD «= O01 11718 6453 6464 6524 
| pce = 002000 11128 
j = 
prRO = 750000 ai78 
baAS ¥F* ert 19448 4431% S461% 5500 5S01* S586 sse7x SS90* S7S51* 5787"  58s9 Ss60* $907 
5908% 5S937 5938* 6029% 6088* 6200 6201* 6204* 6244 6255 6256* 6259% 6455 
| 5873 | 7874 7877 7883 
PRI = So0040 9358 ° 
PRS = opor40 3398 
| = 
pea == po0e08 g308 
PRS = 000240 9398 1725 
-PR6 = 000300 9408 
PR? = 000340 9418 1212 1761 6781 7791 7805 
pau = 155558 tice SO 
= 
| PWRYEC= boones 006 780% 781% 7790% 7791% 7804*  7805* 
| P1.BIT 002316 i7aee sraRt bate 5860 S861* Se64* 5908 5909 S912* 5938 5939% 6393 6460 
'RDBIT 031616 4 3065 3094 3198 3227 3329 3358 3460 3489 3591 3620 3723 
Sen SoM 40 4177 4206 4433 4639 4668 S465 S490 5502 5591 5753 
| aiet « eee 6031 606 » 607 6089 6206 6260 65738 
| RODATA= 21 10848 sh e788 2875 3005 3138 3271 3401 3532 3663 3794 3899 3986 
/-RocaT = 100000 1 aD 5 558 5662 6076 6280 
= boone 10868 
RDLIN = ee 7704 78578 ‘ “aah 
= 
= bBd2 18 2 483 4862 2883 3230 3361 3492 3623 3755 3953 4078 4209 4310 
4439 © 4S40 4671 4769 4866 
| RECAL = 000013 108is 
g 414 7174 78608 
T 370 1197 17548 
SvEC= 000010 10018 
RKBA = BODODS ibeos ears 
= 
000 49x x 384% Gg Ye 7 
eg compen: hOa7s Agkes «64388 «= gpnex =iG7, «fides | S84, 4 f6885 9238. S22ur $780. Seegx 58995 
409% dex 4334% 4493% 4S597% 4722ee 4813* 4914* SOll* S099*% S2l7* 6713s 
RKCS2 = 000010 106ie 6710% 7193 
RKDA = 0000 10608 6709% 
RKDB = 10668 
| RKDCYL= 0000 10658  6708% 
| RKeePS= teed 1Oece 2938 3068 3201 3332 3463 3594 3726 4049 4180 4642 6283 62° 
| RKECPT= 000032 10718 2937 3067 3200 3331 3462 3593 3725 4048 4179 4641 5863 Ge ': 
| 
! 
| 


GOORRERSSOGPREEE ER 
eae Iie ac 


rw 
ow 


wr 
+ 
3 
AK 
u 
8 
_~ 
~ 
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6298 

= 000014 10638 4416 

= 000026 10678 * 1963%  2080# gost $ 97% 2198% 2314 2315% 2435% 2436% e2eS51# 2552s 
Cb 34% * 2834% 2835# 4S# 6 4430e" 4303% 4390 43918 4453e% 4533% 4761# 
476ee 4Yesee “esse 495i#  495e# eeds* O49* Si4l# Si¥e# SessS*#  SeS6# 333" $336# 
5371% * S466 5491 559 754 60 6 6078 


S 5 32 6 6 0 6261 
econ” 6441 64708 6471 6464 6485 6499# 6500 6SeS* 6526 65372 6538 6549* 


op0034 ieee fas’ tee” Sets" SY Ber" 
= 
= 000036 1peSs 1985S 185 2220 2337 f 458 
002306 17258 1883% 
= 000022 10728 
002304 17248 1881 1882 
= 1 ® 6706 
= 19 ai 408 
* 0236 (Page 9789" 7809 
= 500056 ttise 
= 41S 4964 S061 5160 7861% 
anes 69938 7861 
= 1 10838 
= 1 10768 
= 11278 
1116 7157 7169 814748 
= 11028 
= 11498 
002312 17278 1751% 1754 1757 1834 
= 000011 10808 
= 177572 10208 6839 68S4* 6861+ 
= he Teng 10218 
= 177576 10228 ae 
= 172516 10238 6851 
00 90S 1760 1772 5439 6564 6604 7185S 7196 7806 
002400 1196 17578 
002404 1752 755 17588 7204 
= 177774 9168 
= 100000 11578 
001140 12638 0 1792% 17394 1800 1807 1822 S400 S409 S417 S4es S430 S473 
5520 5s33 5703 5765 58 8 5978 6043 6106 6355 6372 BHH9 6479 
6493 6508 6534 6SY46 6558 0 6901 91S 691 6933 6940 69393 7075 
7082 70394 7038 7176 7474 7513 7S68* 789 7809# 
000176 11948 1800 1822 7474 7513 7536 
= 000001 9698 
= 000001 9598 969 
= 00000e 9588 968 
= 000004 9578 967 
= 6Beu8 en 
= 
= 000040 9S4s8 964 
= 000100 953% 953 
= 0002 9528 
= Baroae zh 3) 
= 000002 968% 
= 002000 94948 
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CZR6EB.P11 O02-DEC-77 10:21 CROSS REFERENCE TABLE -- USER SYMBOLS 





SW = 9478 7176 
SW1 = 9468 
SWwl14Y = 94Se 
SWw1S = S448 
= 9678 
2 9668 
SW4 = 96Ss8 
Sws = 9648 
aie = 9638 
 : at 
| = 
| SWS = 9608 BHYG 64793 6493 6508 6534 SSYE 6558 6600 6993 
S.CLR = 11828 
2-0 = 11838 
| $.PACK= 118S8 
S.RECL= 11798 
' §.RTC = 11818 
2- aFeKs 11788 
S.STSP= 100 11808 
taes 11848 
BITVE= 14 10028 
TKVEC = 100S# 74S1# 74Sex 
TPVEC = 4 10108 
T 310 17268 # 6597% 7864 
T ley 10088 1778 1779 
TRTIVEC= 14 10038 
TSTeY1 1206 81578 
TSTBYe 4618 81598 
Telly Boeeds 1gs6, goes 
Yeti Be ise eect 6968 
TSTl 74 eBbe8 6969 
TST13. 010156 29938 6970 
TST14 010704 312eS# 6971 
TST1S §©O011432 32578 6972 
TST16 O12160 33888 6973 
TST17 12714 35198 6974 
TSTe 30 1991 1996 2001 20e9% 6961 
TST20 3 §=0134S0 36508 $6975 
TSTel 014176 37808 6976 
TSTtee 014812 38858 6977 
TSTte3 015004 39738 6978 
Tetee O1eeee doses E980 
TST2b ibeos 43318 6981 
TSTe7 017264 4421 4428 4443 44668 6982 
TST3 oo444e 2109 2114 2119 21468 6962 
ST30 ©6©017600 4S618 6983 
TST31 020350 * 6984 
TST3e 020660 47878 6985S 
TST33 ©6Gelelé 48928 6986 
TST34 ath ssgse 6987 
TST O2e1 Sose8 69 
TST36 O2e4SE Si8is 6989 
TSTY oosos4 2226 2231 2236 22638 6963 
TSTS OOS466 2343 2348 2353 23818 6964 


4 
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CZR6EB.P11 Oe-DEC-77 10:21 CROSS REFERENCE TABLE -- USER SYMBOLS 
rey poeuig ae Ee Penn nee> ome 
TYPOS = 10440S $310 5317 78S18 P ey ey 9s7 8 304 3 3 7077 > 
sl hatte te te ie te i fe as fe one ne de ne fe 
cc es en ee ee eH 
TYPERR 034 7084 7lels 
TYPOC = 104402 1838 6S 7154 7537 7848e 
TYPON = 1044 78508 
TYPOS = 104403 78498 
-ASOF 00217 16778 
24 002164 16728 4294 4446 48S0 5271 a. 3 . 4 usox 2 2557 2643 
681 e160 Cet ees Ty 


4425 4440 4541 4673 4770 4867 5396 5514 5669 5778 5808 $951 6056 


Zz Z' 7877 788: 
T.cS@ 002170 sath gae? 8368 cReG S0S6 514 5149 S261 S263 7865S 7877 7888 
T.0A 002166 16738 5693 7881 7888 
T.0 002202 16798 
T:DS- Ooei7e levss ees, 7e7? Page 
T.ECP at # 74 3e01% 3207 3332% 3338 3463% 3469 3594" 3600 
ha epranpene a7eee 5732 § ddx goee aa0% 4186 464ee 4648 62e83* 6287 b28ee 6304 6734 
T.ECPT 002214 4s # 41 3067% 3071 3200% $3204 3331% 3335 3462% 3466 3593% 3597 
358 % 5769 Soups ooe. PL te re .. 4641# 3e33 S868* 5869 621S* 6216 6e68* 
626 * 628 
T.ER 002174 ance? 7 seg $35 3403 3528 3367 3498 3629 3761 4084 4215 4416# 
ate eager e6s3" Eopee bce? eorex ec7s bos eos 6208 beelx eeee edulis yu Bu? 
giz6 648S* 6486 6500* 6501 6526* 6527 6538% 6539 6550* 6551 7868 7874 
T.MRe O02206 4e53° 1984* 1993 eldee 2111 2219% 2228 2336% 2345 2e4S7* 2466 S41S 6736# 
T.MR3 002210 468e8 1985* 1998 2103% 2116 2220% 2233 2337% 2350 e4se* 2471 S423 6737 
T.SPAR O02216 16858 
T.WC 002162 16718 5277 7888 7302 
UFE = 000400 11158 
UNLOAD= 000007 10798 
UPeE = O20000 11208 
= 
vv ~ 6801 00 11518 
WCE = Q40000 llels 4957 sos4 5147 S261 
WLE = 004000 11378 
WROATA= 10858 1924 e04e 21s9 2276 2397 esle e595 
WROCNT Q0e3. 17378 
AD= ie 10878 
WRL  _= 004000 11548 
WRIBIT $791 S58de 5865S 5913 5940 64398 
WRTCHK= 000031 10888 4479 4S72 4708 4799 4904 5001 5093 5192 
WRTGAT= 0400 11738 S788 6454 
WR.PAR= O00004 10498 
SAPTHD 001000 1223 12298 


H14 





CZR6EBO RK611 OSKLS CTRL PRTS MACY11 30(1046) O2-DEC-77 10:43 PAGE 177 SEQ 0176 
CZR6EB.P11 02-DEC-77 10:21 CROSS REFERENCE TABLE -- USER SYMBOLS 
pastate SHEREE U 7033 7048 
YC 36 7004 70068 
SATY1 70028 
SATY3 70038 #7234 
SATY4 700S% 7090 
SAUTOB 12608  1326% S27 7684 
$8 13478 1837 184S* 1886 7152 7810 
1esS8 
T 12578 
| $BELL 12988 7077 7110 7480 7677 
| $C 7e51% 7261 7268 7277% 72828 
$CK 7 138 785 
‘scm teres oshe «eee ioeee «orgs «lose «ole «12828 «12938 
= g t 
ae teres. eres Ges 1878s 18738 188 1881S BEBE 1388S 
= 
SCM4Y = 12838 12848 12858 12868 12878 #12888 12898 #12908 12918 12928 12938 12948 12958 
8 
SCNTLC ? 46 7549 76778 
NTLG 7534 76798 
SCNTLU 036773 7559 7652 76788 
Seite Bi2ee ii, “eee 
SCRLF 10154 13008 5318 7085 7110 7133 7138 7146 7159 7172 7250 7285 7570 7657 
SCROUT 033110 6E54 68718 
K 03556 7386 7420 74288 
EVCT OO012 13128 
EVM O01326 13468 
_§00AGN 023306 5300 5321 5327# 
| $0TBL oO35552 7389 74248 
| SENDAD 023276 1206 1814 53238 7105 
SENDCT Oe3l4e 1782 53028 
| SENULL Oe33l1e 53308 
SENV 001270 13178 1820 7011 7035 7087 7229 
~~ SeNvn oo1e71 13188 80s 7013 7231 7236 
| SEorct 653134 Pass ooese 2505 7184% 7200 
| SERFLG 001103 12468 1759% 68 929 6931 6937* 6959 6995 7072* 7110 7195* 
| SERMAK OO1115 leses 17e5% 6931 6954* 6959 
| SERRPC partie 12538  7079% 7080% 7081 7110 7865 7868 7870 7872 7874 7877 7881 7883 
7886 7888 7891 7893 7896 7898 7900 7302 79C4 
SERTIL. ODiiie {Beas S5iS «= S319" 7078" 7110 
| SESCAP 001236 12978 1784% 1887% #2729% 384ex S398* S411" S419% SW27% S4Y33% S438*% S4S9* S470# 
S472% S477% «+%S47B8% S494x SSo7* SS2ex 5595* SS598% S603% S604* 5705* 5757*  S7b4# 
| 6 MTA gf tS 4 A SR i 
' # * z * * ¢ 
gras e4ges 6503% 6510* 6529% 6541* 6553 6560* 6596 6599* 6953* 7101 7103 
| * 
SETABL 001270 13168 
SETEND 001330 235 13498 
SFATAL OCl2Se 13098  7039% 
SFFLG 034056 7002% 7005* 033 704e*x 70508 
| $FILLC 001156 12718 7254 7285 








14 
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CZR6EB.P11 O2-DEC-77 10:21 CROSS REFERENCE TABLE -- USER SYMBOLS 


Cs 7285 
48 


SFILL 1155 127 
Ha pt iee 125 
$GD0AT 1124 Lesee 
Fae ere8 358 7853 
Stare” OotBte ee 
Silber 49 A 26% 77378 
SICNT ll 12478 6944s gus 6947% 6958 
INTAG 11 leble 7532% 7551 7571 7684 
| SITEMB 1114 12518 7081% 7 7110 7124 
SKTNEX 3052 6838 68638 
TOUT 3046 6855 68608 
$KT11 10 68368 6840%  6863% 
SLF 1246 13018 7110 7285 %b7? 77 7738 
 $LFLG O34055 7043% 70498 
| SLPADR 1106 12488 1786% 6926 6935" 6951* 6956 6958 7811 
'$LPERR 001110 12498 1787% 49lex S009* So98* s440 6565 6605 6935 6952 6958 
| SLSTAD 3154 6876% 68838 
 §LSTBK 3156 6877% 6884s 
| §NADRI 1302 13348 
| 001306 13388 
| 001312 13418 
1316 13448 
SmarL 031500 1231 1235 13078 1804 1820 6950 7087 7229 
| $MAMS2 001304 13368 
3 001310 13398 
| 4 001314 13428 
pal nos 12318 
SMFLG 34054 7003% 7009 7044x 70488 
SMNEW 037016 7538 76828 
001264 13148 7015* 7022 
SMSGLG 001266 13158 7024% 
$MSG 1250 13088 017 7025* 7037 7041* 
$MSWR 037005 7535 76808 ‘ 
SMTYP1 001301 13298 
| $MTYP2 001305 13378 
|SMTYP3 001311 13408 
| SMTYP4Y 001315 13438 
| $MXCNT 033470 6548 69588 
,$NULL. 001154 12698 7256 7285 
$NWTST= OOOOO!L 18948 1896 20148 2016 21328 2134 22498 2251 23678 2369 24878 
2573 26SS* «6026570 a 7bee = O7E4 28478 2849 9758 2981 31108 3112 
33748 3376 35058" 3507 36368 3638 37688 770 38738 3875 39588 
4093 Y224e 4226 43178 4319 44548 4456 4S46e 4548 4684" 4686 
48738 4875 #49708 4972 &®®©SOb8# 5070 Si6se 5170 
SOCNT 03534 7317% 734% 73598 
SOMODE 035344 7312% 7316% 7324% 7335* 73618 
SOVER 03345 6902 6927 46936 63946 6955s 
Spas 001256 13118 1804* 5296* 5S297* 5308 5330 6942 °&#®6959 
| $POWER 0374 7807, 78148 
SPWRCT 037406 7798% 7799% 7800* 7802 78138 
SPWRON 037264 1780 7789% 7804 


SPWRUP 037312 7730 77988 


SEQ 0177 


6997 7100 


2489 2es71s 
ot 3245 


CZR6EBO — OSKLS CTRL PRTS 


CZR6EB.P O2-DEC-77 10:21 
Ss 1244 12998 
SROCHR 036432 760e8 
- SHEERS e032. 
Y 039050 rease 
$ROSZ = 000010 76188 
$RE 1169 12738 
Sree] Bolles teres 
$R eS 1166 12778 
SREG3 got ize 12788 
SREGY 1172 12798 
SRE 1174 12808 
SRE 1176 12818 
SREG 1200 le8es 
SRESRE 37eceb 77718 
SRTNAD 023310 53298 
SROAR = HHEKEX 7861 
Score BRUCE (pat 
Hate {$9 17518 
6900 
$SI 032652 1884 
S$SIZEX 033114 6862 
S$STUP = 177777 17518 
$SVLAD 033420 6910 
SvPc = 000220 1204s 
SSWR = 7400 8788 
1783 
2863 
4467 
6891 
69393 
7098 
SSWREG 001272 13198 
SSWRMK= OO0000 ao 
$SWO8T 033472 S47 
STESTN 001254 13108 
7870 
73902 
STIMES 001234 12968 
3126% 
4697% 
TKB 0011 1cb68 
STKCNT 035572 74338 
STKINT O356 1765 
STKQEN= 035601 74378 
STKQIN 0O35574 74348 
STKQ 3557 74358 
$STKG 035600 74368 
$TKS 001144 12658 
STKSRY O356 74S1 
STMPO 001202 12838 
1877% 
STMP1 001204 1284s 
STMP10 OOleee 12918 


7110 
7856 


7257 
7888 


MACY11 30(1046) 179 
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7285 


1774 
7097 


02-DEC-77 10:43 PAGE 
7589 7660 7677 
4959% SOS6* 5149# 
4960# S5057#%  5150# 
4961# SO058*# S151# 
7904 
1776 1778 1780 
7105S 7472 7477 
89s 896 897 
1787 1910 2030 
3258 3389 3520 
4788 4893 4990 
6894 895 6901 
6955 6958 7062 
6896 6919 
5982 6047 6377 
5767 $980 6045S 
7877 7881 7883 
2030 2147% e2264% 
3520 3651% 3781% 
4990% S083%  5182% 
7464 489 S17 
7495* 7609 7611% 
7$30 
7501 7S50e% #7503 
goiee 614 7616% 
748S* 7487 7493% 
1845S 1851* 1853 
Sb2ex S625 S628* 


J14 


77358 


7738 


7531 
1868* 
S635* 


7541 
1870 
5628 


1786 


7123% 
7893 


2668* 


4237% 
6948 


7S53*# 
1872 
S661* 


1814 


7573* 
1874s 


SES 0178 
1817 S234 
1297 1298 
2668 2775 
4237 4332 
$328 $330 
6931 6938 
7082 7094 
7865 7868 
7898 7300 


2863 2994*# 
4467% 4S62% 


1875* 1876% 


—_K1Y 


keneeeo RK611 OSKLS CTRL wr MACY11 30(1046) O2-DEC-77 10:43 PAGE 180 SEQ 0179 


2 Pil Oe-DEC-77 10:2 CROSS REFERENCE TABLE -- USER SYMBOLS 
} ag poles? lese8 §66181# 0 6354 
TMP 1 leeb 12938 6189% 6193% 6239 6265S 
TMP 13 O01 E38 12948 6190% 6194* 6274 
TMP14 O01 12e95@ 6191% 6195* 6277 6290 6295 
ae Boies 128Se 
TMP O001le1 1e868 6175% 6370 
STMPY 6 OOlele 12878 6177% 6368 
STMPS)§ § 001214 esses soa" 2956 2961% 3063% 3091% 2'96% 3219 3ee4*# 3327% 3350 33SS* 
4S6e 81 S486%  3589% le 3617# 3721% 3744 3749% Y4O44# 4067 4072e% 4175% 
4198 4203% esac 4660 4665* Ses4# 5881 2375 S896* * $902% 5920 5927 
592e9% 6186# be3e% * 62e46% 6313 6317# 6320 6324s 
ST 001216 12898 S846# 5960 5963 6171% 6334 6342 
_STMP7 OOle20 12908 2730% 2749 2751%  3843% 3864% Se4se S947 956 6173 3 
STN) §== 000037 798 830 1894 19108 2001 2014 20308 e109 2114 2119 2132 
21478 e226 2231 2236 2249 eeb4e 2343 2348 2353 2367 e38e8 2464 2469 
74 2487 esoi#e 2571 eSs4s 2655 eb688 e762 27758 847 28638 793 S948 
3110 3126s 3 32588 3374 3898 3505 35208 3636 36518 3 37818 3873 
38868 3958 39748 093 41068 4ee4 42378 17 43328 2 428 444 4454 
44678 46 45628 46978 4774 47888 4873 48938 4970 49908 S068 S083 


$TPB 0011Se 8 274% 72 
STPFLG 001157 le7ee 7223 7285 
TPS 001150 l1e678 7272 7285 
STRAP 037420 1778 78248 
| STRAP2 O3744e 78358 7846 
STRP = OOOOIE 78398 7848s 7849s 78508 78518 78528 7853 78S48 7855 78568 #78578 78588 78598 
78608 78618 78628 
Tern Baia n {3528 shales 
STSTNM 001102 12e4Se S2es4*# 6890 6922 6949% 6950 6955 6959 7074 7110 7122 
STTYIN 7627 7628 7640 7658 7672 76768 
= £EREEE U 7852 
STYP 73748 7851 
$T 034636 7030 7ee3* 7839 7847 
STYPEC Bae0Se 7253 7260 7267 72728 #87273 7575 
STYPEX S116 7278 7280 72838 
STYPOC 035144 73158 7848 
STYPON 035160 7314 73178 7850 
$TYPOS 035120 73108 7849 
S$UNIT OOlebe 13138 
SUNITM 001010 1234s 
SUSWR 001274 13208 
SVECT1 Bai 360 134S8 1847 185S* 1856* 1859 1879% 1880% 1881 1883 
$VECTe 1322 13468 
$XTSTR 033172 6904s 
S$SGET4= 000000 S3ee28 
$$SWO8= 000037 69598 6960 69618 69628 69638 69648 6965s 69668 69678 69688 69698 69708 69718 
69728 69738 69748 697S8 69768 69774 69788 69798 69808 69818 6982s 698348 6984s 
698S# 69868 69878 69888 69898 69908 
SOFILL 035343 7311% 7315% 7 7360% 
S4YOCAT= #%#4e% U 6901 7084 
= 050642 11888 11928 11988 204 1205s 1207% 1209% 12108 12138 1219 12208 le 12248 
12428 1302 177 17286 1787 18308 53078 5330 53318 6958 6959 70518 7110 
osuR 74288 7432 74368 74o¢ (4588 7?S76# 7677 76848 7738 7793 86 87398 
-SASTA= #eeeee LU 7003 7006 


CZR6EBO RK611 OSKLS CTRL PRIS 


C2ZR6ES.Pil 
-$X = 001000 


02e-DEC-77 


10:21 
12198 


L1i4 


MACY11 30(104%6) O2-DEC-77 10:43 PAGE 181 
CROSS REFERENCE TABLE -- USER SYMBOLS 


1224 


SES 0180 


CZR6EBO RK611 OSKLS CTRL PRTS 
CZR6EB.P11 1 


O02-DEC-77 10:2 
arn S 12148 
OMMEN 1 ise 
ENDC 10lee 
ERROR & 


1355 1 

1 208 1 3 
sig? Sige |B 
cous 2287 eese 
531g 8035 B28 
2485 2520 eSel 
Sees Beau 

e708 5558 595 
2800 2801 


3178 317 1 
3321 3537-3540 
3439 440 3441 


3927 3928 3929 
ee 
4158 4164 4393 
4268 4269 4 

4e99 431 4 

2 oS 
Mae : 5 ue2e 
$3 $y 

4755 4756 4772 
me ee weal 
ee aH 


Se3e 5234 
5e79 6598 
Faroe 101et oie cone 
GETPRI 10128 832 
GETSWR 10le8 18178 
PF TEE soo gory 
ss] 
sees 998, us 


36368 3638 3768% 


MACY11 30(1046) 


02-DEC-77 


M14 
10:43 PAGE 183 


CROSS REFERENCE TABLE -- MACRO NAMES 


1 4 

si3g ig? 

2233 2236 

asd Sie 

ese 603 
710 2711 

2807 sol 
95 


3 
ap 3710 
zB (38 
3935 3936 
4021 4 
4138139 
ues «4a34 
4356 4357 
4384 864385 
44 4604 
meee 
qu 4959 
4816 4817 
wey4 = HBNS 
gds2 S083 
5059 5107 
5134-55135 
5237-5238 
2153 2270 


SBi4 Baus" 


3770 387348 


43de Badd Aig AIT 
e063 2070 20712075 
5288 585 | 5245 BAT 
gece ee0e e302 2303 
533i 5493 588 
ee 

4 11 
Bus 64 $91 2692 
271 2718 2719 2720 
2811 2812 2815 B16 
Bt ne eS 3 
2926 2927 2943 2946 
3p Sie, Bigs ey? 
CC mE Cae 
333; Sues) es Shad 
sua USC SHB 352 
e330 Seen Sees 38 
71s 371g 3713374 
330838100 3lt, 312 
3937-3038) 3833 ae33 
40eS42BsCY 403 
ny bse} by Sy Sb 
Meg eg 
4358 «43 4364 4367 


cose S 
$239 5240 
2391 

Bb7Ge 


SGa° Side Site" 


3875S 3958% 3960 409148 


ga8z® 
24S 
42248 


$3538 
376 
43178 


2S73 
35058 
4319 


SES 0181 


sen58 
350 
44S4 8 


CZR6EBO RK611 OSKLS CTRL PRIS 


CZR6EB.P11 
4YY4oG 
MULT 10128 
NEWTST i10le8 
16 
OSECRD 17208 
ri tf 
OSECWC 17218 
POP 10les 
7776 
| PUSH 10les 
7701 
REPORT 10128 
SCOPE 9078 
| 3519 
| 5181 
| SETPRI eice 
| SETTRA 8398 
| SETUP 10les8 
IP iie* 
2474 
| SLASH 1012s 
| SPACE 10les 
efaes = ioies 
| B25 
| 3110 
3972 
4873 
7120 
SWRSU 10le8 
TRMTRP 78398 
TYPBIN 10les 
TYPDEC 10les 
TY’ 10les 
T 10les 
TYPOC 10les 
YPOC 10les 
TYPTXT 10les 
SSCMRE 12368 
SSCMTM 12368 
SSESCA 10les 
SSNEWT 10le8 
3505 
5168 
SSSET 78398 
S$SSETM 18048 
$$SKI suse 
474 
- EQUAT 878s 
HEADE 8788 
-KT11 8788 
. SETUP 8788 
. SWRHI 8788 
- SWRLO 878% 
-SACTI 878% 


4S468 


1894 
3636 


2673 


O02-DEC-77 10:21 


4S48 


2014 
3768 


2780 


4566 
54793 


S4S6 


20e9 
3780 


MACY11 30( 1046) 
CROSS REFERENCE TABLE -- MACRO NAMES 


46848 


2132 
3873 


2868 


4701 
5606 


ss4g9 


2146 
3885 


7850 


1277 
1285S 


2132 
3€,3 


7850 


2001 
4443 


4686 


2249 
3958 


2398 


4792 
$771 


5731 


2263 
3973 


7851 
2109 


O02-DEC-77 

47748 8 4776 
2367 2487 
4091 4224 
3131 3264 
4897 4994 
5984 6049 
5836 6009 
2381 2500 
4105S 4236 
7883 78SS 
2114 2119 
1238 1302 
e571 es8e 
3387 3505 
4317 4330 
5081 5168 
7S08 7523 
1279 1280 
1287 1288 
2367 2487 
4091 4224 
7883 78SS 
2114 2119 


N14 


48738 


2571 
4317 


3394 


5186 
6361 


6165 


2583 
4331 


7856 
2226 


10:43 PAGE 184 


4875S 


2655 
4454 


3SeS 


6669 
6619 
2667 
4466 
7857 
2231 


1282 
1290 


BESS 
4454 


78S7 
2231 


1291 


2762 
4S46 


7858 
2236 


1292 


2847 
4684 


7889 
2343 


1293 


2979 
4774 


7860 
2348 


1294 


3110 
4873 


7861 
2353 


2464 


1295 


3243 
4970 


2464 


SEQ 0182 


5170 . 


3374 
S068 


2469 


3374 
5068 


2469 


a 


i a ES A SSS SSS 
| ses © ® © @ & “ee @ *-. 


f BO RK611 psK CTRL PRTS MACYL1 30(1046) Oe- pee-¢7 0: 43 PAGE 
Rots.P!1 C-77 19:21 CROSS REFERENCE T Ape = - MAC 
378s 214 
cee (G849 
® 1186 
o 36 
788 3 
8 
a 
B 
® 7685 
8788 7423 
788 7738 
788 6685 
8788 6808 
8788 7816 





. ABS. OS0642 ooo 


ERRORS DETECTED: O 

RMO3: CZR6EB, RMO3: CZR6EB. SEQ/SOL CRF /NL: TOC/DOC=RMO3: CZRGEB.P11 
RUN-TIME: 29 24 2@ SECONDS 

RUN-TIME RATIO: 1392756=24.7 

CORE USED: 30K (S59 PAGES) 


DOCUMENT PAGES: 183 


185 


RO NAMES 


SES 0183 


